winglion 发表于 2003-7-4 10:31:00

[求助]如果遍历polyline里头的vertex?

我希望一个一个的读取polyline上的点,但是由coordinate 和coordinate却无法知道里头到底有多少个点?
请问由什么简单的 办法遍历这些点呢?

zfbj 发表于 2003-7-4 12:01:00

Dim retCoord As Variant
retCoord = plineObj.Coordinates

MsgBox UBound(retCoord) & "aa" & LBound(retCoord)

用UBound和LBound函数分别获得数组retCoord的上下标,多段线点的个数为:
UBound(retCoord) - LBound(retCoord) + 1
由此,你可以访问所有的点。

李勇 发表于 2003-7-5 13:11:00

同意楼上的意见。

tangagen 发表于 2004-5-27 10:10:00

谢谢版主!
页: [1]
查看完整版本: [求助]如果遍历polyline里头的vertex?