vba怎样调用vlax类，用lisp的command函数来替代sendcommand，比如在模型空间绘制直线

wxd20130610

Dim Obj As Object
Set Obj = New VLAX
Obj.EvalLispExpression "(setq pt1 (list 0 0))"
Obj.EvalLispExpression "(setq pt2 (list 100 100))"
Obj.EvalLispExpression "(command " & """.line """ & "pt1 pt2" & "“”" & ")"

‘Obj.EvalLispExpression "(command " & """zoom""" & " ""e"" " & """""" & ")"

Set Obj = Nothing

运行后cad界面没有反应，也没有直线绘制出来，不知怎么回事？

wxd20130610

基本上带有command命令都不能发送