操作方法：计算某面的质心

摘要

提供的说明将介绍如何在“字段计算器”中使用 VBA 脚本来计算面质心的纬度和经度值。

过程

1. 打开面要素类的属性表。
2. 在属性表中，导航至“选项”>“添加字段”，然后添加两个新的 Double 字段。 将一个命名为 Latitude，并将另一个命名为 Longitude。
3. 启动编辑会话。
4. 右键单击 Longitude 字段 > 字段计算器。
5. 选择高级。
6. 将以下脚本粘贴到“预逻辑 VBA 代码”框中：
   
   

   代码：
   Dim Output As Double
   Dim pArea As IArea
   Set pArea = [Shape]
   Output = pArea.Centroid.X

   
   
7. 在下方文本框中键入不带引号的“Output”。
8. 单击“确定”。
9. 对于 Latitude 字段，重复步骤 4 到 8，除了将脚本最后一行中的 X 更改为 Y。