|
我在学习帮助文件时遇到的制定点画线型的程序:
' Create the line
Dim lineObj As AcadLine
Dim startPoint(0 To 2) As Double
Dim endPoint(0 To 2) As Double
startPoint(0) = 1#: startPoint(1) = 1#: startPoint(2) = 0#
endPoint(0) = 4#: endPoint(1) = 4#: endPoint(2) = 0#
Set lineObj = ThisDrawing.ModelSpace.AddLine(startPoint, endPoint)
除了#外其他都和画普通线近似,请教高手,那个#代表什么意思,它是怎样制定层里面的线型的
|
|