|
mline比例变数已经为"6"了为何会出的线还是为"1"的宽??
奇怪!!@#!@#
Dim objEnt As AcadMLine
Dim points(17) As Double
' " setup initial points
points(0) = 0: points(1) = 0: points(2) = 0
points(3) = 10: points(4) = 0: points(5) = 0
points(6) = 10: points(7) = 10: points(8) = 0
points(9) = 5: points(10) = 10: points(11) = 0
points(12) = 5: points(13) = 5: points(14) = 0
points(15) = 0: points(16) = 5: points(17) = 0
ThisDrawing.SetVariable "CMLSCALE", 6
Set objEnt = ThisDrawing.ModelSpace.AddMLine(points)
vba中竟然找不到此语句的用法~~
CMLJUST, CMLSCALE, and CMLSTYLE &MLSTYLE
mlstyle要设为起始终点两边封闭(直线或外弧)要怎么设变数呢?
:~(
|
|