查看单个帖子
旧 2009-04-28, 10:16 AM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 vba和lisp怎么样向命令行发送本身的命令?

vba和lisp怎么样向命令行发送本身的命令?
www.dimcax.com
vba和lisp怎么样向命令行发送本身的命令?
我做了一个交互操作的界面,只要在文本框填入命令,就会在当前cad打开的所有文档中执行,这是用vba编写的:
private sub cmdexcute_click()
dim cmdcad as string
dim drawing as acaddocument
cmdcad = trim(txtcommand.text)
userform1.hide

for each drawing in thisdrawing.application.documents
drawing.activate
thisdrawing.sendcommand cmdcad chr(10) ' & chr(13)
thisdrawing.regen acactiveviewport
next drawing
userform1.show
end sub
现在的问题是当输入的是系统命令或者lisp编写的命令时可以执行,可如果是vba本身的命令就无法执行了,不知有什么好的解决办法?
另外,在lisp里更无法发送用lisp编写的命令,不知有什么办法可以解决这些问题,谢谢了

没人会吗,哎,帖子都沉了

高手们看看啊,我觉得这非常有用的
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)