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

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

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)

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

发表回复

精选推荐