请问关于SelectByPolygon使用?

王咣生

我选择图面上的所有POLYLINE, 循环每一个, 得到坐标, im retCoord As Variant
retCoord = plineObj.Coordinates 再用该实体用下列方法选择与之相交的实体, 但是PointList必须是一个Variant (array of doubles), 比如: Dim pointsArray(0 To 11) As Double 不能是动态数组,应该如何办? object.SelectByPolygon Mode, PointsList, FilterType, FilterData

雪山飞狐_lzh

Dim pointsArray() As Double


ReDim pointsArray(11) As Double

王咣生

ReDim pointsArray(11) As Double中的11我必须用一个变量记录,因为数组中元素的个数是不定的,而在VB语法中这样就行不通了.

雪山飞狐_lzh

num=11


redim pointsArray(num) As Double


这样可以

王咣生

谢谢.