ArcGis添加字段(自动赋值)参考.pdfVIP

在 ARCGIS 属性表中， 一般不会包含实体几何信息， 可以采取 VBA 进行计算。 下面是几个简单的代码 （转 载自集思学院） 特点 : 1 推荐给不会使用 AO 的朋友 2 可以保存为 CAL 文件以备下次方便使用 使用方法 1 打开属性表 ,选择计算的字段 ,右点选择 Calculate Values ； 2. 选择 是“ ”，进入 Field Calculator ； 2 选择 Advance 选项； 3 在 Pre-Logic VBA Script Code 编辑框中输入 VBA 代码； 4 在下面编辑框中输入赋值部分 . 1--点坐标 X VBA 部分 : Dim pGeo As IGeometry Set pGeo = [Shape] Dim pPoint As IPoint Set pPoint = pGeo 赋值部分 : pPoint.X 2-- 点坐标 Y VBA 部分 : 同上 赋值部分 : pPoint.Y 坐标值为文件存储的固有值 ,和是否使用 On the Fly 坐标表示无