[VBA]vb中用SendCommand "(load "lsp")"运行lsp，怎样知道

wuhan4510

[VBA]vb中用SendCommand "(load "lsp")"运行lsp，

该lsp很大，又要运行下一个命令，

怎样知道什么时候执行完？

mccad

SendCommand只是发送命令，发送后就无法控制命令了。所以什么时候执行完也不知道。

linyiwq

dim app as AcadAplication//假设已经定义

Sub Example_IsQuiescent()

    dim state as AcadState
    Set State = app .GetAcadState
    If State.IsQuiescent Then
        MsgBox "AutoCAD is quiescent."
    Else

        '此时状态为空闲
        MsgBox "AutoCAD is not quiescent."
    End If
End Sub

可以在SendCommand发送命令后,用循环调用Example_IsQuiescent()