ARCGISfieldcalculator妙用

《ARCGISfieldcalculator妙用》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、在ARCGIS属性表中增加需要的字段，并自动赋值使用方法1打开属性表，选择计算的字段，右点选择CalculateValues；2.选择〃是〃，进入FieldCalculator；2选择Advance选项；3在Pre-LogicVBAScriptCode编辑框中输入VBA代码；4在下面编辑框中输入赋值部分.1•一点坐标XVBA部分：DimpGeoAsIGeometrySetpGeo=[Shape]DimpPointAsIPointSetpPoint=pGeo赋值部分：pPoint.X2一点坐标YVBA部分：同上赋值部分：pPoint.

2、Y坐标值为文件存储的固有值，和是否使用OntheFly坐标表示无关。返回当前显示的坐标值参看8,95/53-多边形周长VBA部分：DimpGeoAsIGeometrySetpGeo=[Shape]DimpPolygonAsIPolygonSetpPolygon=pGeo赋值部分：pPolygon.Length4-多边形面积VBA部分:DimpGeoAsIGeometrySetpGeo=[Shape]DimpPolygonAsIPolygonSetpPolygon=pGeoDimpAreaAslAreaSetpArea=pPolygo

3、n赋值部分：pArea.Area5-多边形重心XVBA部分:DimpGeoAsIGeometrySetpGeo=[Shape]5/5DimpPolygonAsIPolygonSetpPolygon=pGeoDimpAreaAslAreaSetpArea=pPolygonDimpPointAsIPointSetpPoint=pArea.Centroid赋值部分：pPoint.X6-多边形重心YVBA部分：同上赋值部分：pPoint.Y7-PolylinexxVBA部分：DimpGeoAsIGeometrySetpGeo=[Shape]

4、DimpPolylineAsIPolylineSetpPolyline=pGeoDimpCurveAsIPolycurveSetpCurve=pPolyline5/5赋值部分：pCurve.Length8-表示点坐标XVBA部分：DimpDocAsIMxDocumentSetpDoc=ThisDocumentDimpSpRefAsISpatialReferenceSetpSpRef=pDoc.FocusMap.SpatialReferenceDimpCIoneAsICIoneSetpCIone=[Shape]DimpGeoAsIGe

5、ometrySetpGeo=pCIone.CloneDimpPointasIPointSetpPoint=pGeopGeo.ProjectpSpRef赋值部分：pPoint.X9-表示点坐标YVBA部分：同上赋值部分：5/5pPoint.Y坐标值为OntheFly显示的坐标，不是文件存储的固有坐标10-连续编号VBA部分：StaticICountaslongICount=ICount+l赋值部分：ICount（从1开始）ICount-1（从0开始）5/5