[求助]：在vba及arx中應該如何等待CAD執行完command再繼續執行下面的程式

origo

在vba及object arx中應該如何等待CAD執行完command再繼續執行下面的程式

acedCommand(RTSTR,"pline",RTSTR,PAUSE,RTSTR,PAUSE,RTSTR,PAUSE,RTSTR,"",0); 以此為例　能等待使用者輸入3個點

但希望能做到可以輸入任意數量的點




在lisp中的解決方式：

.........

(command "pline" )

(while (= (getvar "cmdactive") 1)

　　　 (command pause)

)

..............


PS:上述功能有兩個替代方案　但都不盡理想


1 可以用getpoint getstring...等取得data

再下指令去畫圖，但如此程式就會變的很繁瑣

2 用flag去判斷指令是否執行完成但vba和object arx

都不能如同lisp一樣可以去抓系統變數自動判斷

會需要一直問使用者是否輸入完成

HillMan

建议用getpoint自己去实现！