我想看一级黄色大片_久久亚洲国产精品一区二区_久久精品免视看国产明星_91久久青青青国产免费

您的位置：網站首頁 > CAD新聞

CAD中如何等一個命令結束完后馬上執行某一命令

時間:2011-01-12 09:44:50 來源:未知

剛在群中討論的這個問題如火如荼。之前從來沒有用過acad的事件，感覺突然闖進了一個陌生的地方，費了好大的勁總算弄懂了一點點，暫時不用，可能以后要用，先記下來。

    EndCommand 在命令執行完成后立即被觸發。

    代碼如下、VBA的：

Private Sub AcadDocument_EndCommand(ByVal CommandName As String)
If CommandName = "LINE" Then
MsgBox "執行完了line命令"
End If
     ' MsgBox CommandName

End Sub
Public Sub CtrCommandLine()
    ThisDrawing.SendCommand "_Line 0,0,0 100,100,0 "

End Sub

對于上面，如果不知道是什么命令，可以用MsgBox CommandName顯示。