如何在CAD中使用VBA代碼插入壹個外部塊

假設外部塊是壹個文件名為 bbb.dwg,可以帶路徑。VBA代碼如下

Sub ttt()

Dim insertionPnt(0 To 2) As Double

Dim blockRefObj As AcadBlockReference

insertionPnt(0) = 0#: insertionPnt(1) = 0#: insertionPnt(2) = 0#

blockRefObj =ThisDrawing.ModelSpace.InsertBlock(insertionPnt, "bbb.dwg", 1#, 1#, 1#, 0)

end sub

上一篇:qt 打開文件的幾種方式

下一篇:如何閱讀Tomcat源代碼