点一下栅格计算器的帮助,会有下面的解法

To calculate area:

Dim Output as double
Dim pArea as Iarea
Set pArea = [shape]
Output = pArea.area

To calculate length or perimeter (depending on whether the features are lines or polygons):

Dim Output as double
Dim pCurve as ICurve
Set pCurve = [shape]
Output = pCurve.Length

To add the x coordinate of points:

Dim Output As Double
Dim pPoint As IPoint
Set pPoint = [Shape]
Output = pPoint.X

To add the x coordinate of polygon centroids:

Dim Output As Double
Dim pArea As IArea
Set pArea = [Shape]

Output = pArea.Centroid.X

 

新建立一个字段,在字段上有一个caculator geometry 在点一下,会看到什么……

 

导入到GDB中,又会看到什么……

 

utility下面有一个工具也,看到了吗?

posted on 2009-08-11 14:17  醉意人间  阅读(1835)  评论(0编辑  收藏  举报