[求助]AddLightWeightPolyline(pts)问题

jacky789 · 发表于 2006-9-5 22:31:00

Dim pts(0 To 11) As Double

pts(0) = ispo(0): pts(1) = ispo(1)
pts(2) = ispo(0) - edge1: pts(3) = ispo(1)
pts(4) = ispo(0) - edge1: pts(5) = ispo(1) + ww2
、pts(6) = ispo(0): pts(7) = ispo(1) + ww2
、pts(8) = ispo(0): pts(9) = ispo(1) - edge2 + ok2
pts(10) + ww1: pts(11) = ispo(1) - edge2 + ok2
ThisDrawing.ModelSpace.AddLightWeightPolyline(pts).Closed = True

如何设定取消下列这两行的点(6~9)？

pts(6) = ispo(0): pts(7) = ispo(1) + ww2
pts(8) = ispo(0): pts(9) = ispo(1) - edge2 + ok2

程序仍可绘制？？

zhuxuhong · 发表于 2006-9-6 08:16:00

1)重新定义数组

2)注释要用 '

jacky789 · 发表于 2006-9-6 19:27:00

重新宣告再绘制一次吗？？

无解！！？

账号		自动登录	找回密码
密码			注册