剛在群中討論的這個問題如火如荼。之前從來沒有用過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顯示。