1. 您所在位置：
  2. 网站首页
  3. 文档分类
  4. 建筑/施工
  5. 测绘

地理坐标点连线算法实现.pdfVIP

  • 0
  • 0
  • 约2.05千字
  • 约 2页
  • 2026-11-06 发布于北京
  • 举报

地理坐标点连线算法实现.pdf

    Sub

    Main

    _

    Dim

    RowIDNUM

    为整数

    Dim

    X1

    为浮点数

    Dim

    Y1

    为浮点数

    Dim

    X2

    为浮点数

    Dim

    Y2

    为浮点数

    Sub

    Main

    _

    行ID数字

    =1

    设置坐标系统

    地球

    投影

    3,

    1002,

    m,

    0,

    49.5,

    48.5985227778,

    50

    600000,

    200000

    边界

    (‑40092,

    ‑818525)

    (1264450,

    486383)

    从

    POINT

    获取第一条记录

    当未到达POINT的EOT时循环

    _

    从POINT中选择*，其中行ID

    =RowIDNUM

    __

    X1=对象地理(选择.对象,OBJ地理点X)

    __

    Y1=Objectgeogra

    您可能关注的文档

    最近下载

    文档评论（0）

    1亿VIP精品文档

    更多 >

    相关文档

    更多 >