Dim MLineObj1 As AcadMLine
Dim MLineObj2 As AcadMLine
Set MLineObj1 = ThisDrawing.ModelSpace.AddMLine(point)
MLineObj2 = MLineObj1.Mirror(l1s, l1e)
以上程式最后一行出現“物件變數或with塊變數未設定“的錯誤,請問是怎么回事,謝謝,我是新手。
uj5u.com熱心網友回復:
改成這樣試試:set MLineObj2 = MLineObj1.Mirror(l1s, l1e)
物件變數賦值需要用set的.....
uj5u.com熱心網友回復:
VB6、VBA中,給物件變數賦值都是 Set xxx = ....... 這種格式的陳述句。轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/88071.html
標籤:VBA
上一篇:如何判斷合并單元格,累加行數值。
下一篇:求用VB編程立象列印機的代碼
