gotop 发表于 2007-5-31 00:51:00

请问AddLightWeightPolyline(points)中,points数组一定只能设置为double型吗?

Dim points(0 To 9) As Variant
这样定义程序无法运行出错?
points数组一定只能设置为double型吗?

Sub Example_AddLightWeightPolyline1()
    ' This example creates a lightweight polyline in model space.
   
    Dim plineObj As AcadLWPolyline
    Dim points(0 To 9) As Variant
   
    ' Define the 2D polyline points
    points(0) = 1: points(1) = 1
    points(2) = 1: points(3) = 2
    points(4) = 2: points(5) = 2
    points(6) = 3: points(7) = 2
    points(8) = 4: points(9) = 4
      
    ' Create a lightweight Polyline object in model space
    Set plineObj = ThisDrawing.ModelSpace.AddLightWeightPolyline(points)
    ZoomAll
   
End Sub

烟雨.江南 发表于 2007-5-31 08:03:00

是这样的,必需是Double类型的。这个在帮助文档里面有说明的。

gotop 发表于 2007-5-31 09:20:00


恩,谢谢了
我在帮助文档中找到这个说明了
我还以为它说支持Variant呢,我的英语太菜了~~~

VerticesList
Variant (array of doubles)
页: [1]
查看完整版本: 请问AddLightWeightPolyline(points)中,points数组一定只能设置为double型吗?