一、计算面积
添加AREA字段,然后右键点击字段列,然后点击CALCULATE VALUES--->选择ADVANCED
输入以下代码,然后在最下面=处写OUTPUT。点击OK就OK了。
Dim Output as double
Dim pArea as Iarea
Set pArea = [shape]
Output = pArea.area
二、计算长度
同上添加LENGTH字段,然后右键点击字段列,然后点击CALCULATE VALUES; --->选择ADVANCED
输入以下代码,然后在最下面=处写OUTPUT。点击OK就OK了。
Dim Output as double
Dim pCurve as ICurve
Set pCurve = [shape]
Output = pCurve.Length,
shp文件直接可以得到
在属性表中右键标题栏 在弹出菜单中选择cauculate geometry ,老版本没有这个功能 就用field calculator 写一点vba代码即可
raster可以转成shp文件
若你的raster文件是integer类型的,那么直接看属性表 找到你的土壤类型 计算有几个单元 乘以单元面积可以得到 至于单位自己根据自己的图的单位得到
ArcMap中计算多边形面积和周长[转自其它论坛]
一、计算面积
添加AREA字段,然后右键点击字段列,然后点击CALCULATE VALUES--->选择ADVANCED
输入以下代码,然后在最下面=处写OUTPUT。点击OK就OK了。
Dim Output as double
Dim pArea as Iarea
Set pArea = [shape]
Output = pArea.area
二、计算长度
同上添加LENGTH字段,然后右键点击字段列,然后点击CALCULATE VALUES; --->选择ADVANCED
输入以下代码,然后在最下面=处写OUTPUT。点击OK就OK了。
Dim Output as double
Dim pCurve as ICurve
Set pCurve = [shape]
Output = pCurve.Length,