为什么这个程序在2002中不能正常运行呢??
Public Sub aaawe()<BR>Dim obj As AcadBlockReference<BR>Dim str As String<BR>Dim point(2) As Double<BR>point(0) = 100: point(1) = 100: point(2) = 0<BR>str = "c:\wjct\tl\dxs.dwg"<BR>Set obj = ThisDrawing.ModelSpace.InsertBlock(point, str, 1#, 1#, 1#, 1#)<BR>End Sub<BR>总是提示我插入块作用于Iacadmodelspace*对象错误 Set obj = ThisDrawing.ModelSpace.InsertBlock(point, str, 1#, 1#, 1#, 1) 谢过2楼的兄弟
页:
[1]