请教高手---怎样在命令行运行程序?
bophy
bophy Lv.2
2007年06月29日 13:06:46
只看楼主

本人做个小程序 有窗体(userform1) 模块 怎样实现在命令行输入几个字母然后就运行程序假如文件名叫 AUTO.dvb 窗体(userform1)上有5个command1-5按钮 模块名为"模块1"

本人做个小程序 有窗体(userform1) 模块 怎样实现在命令行输入几个字母然后就运行程序
假如文件名叫 AUTO.dvb 窗体(userform1)上有5个command1-5按钮 模块名为"模块1"
免费打赏
huerfei008
2007年06月29日 21:17:57
2楼
应该先加载才能运行的吧!                
回复
tongmingniao
2009年03月17日 01:47:11
3楼
方法很多,比如可以自定义菜单和工具栏,Alt+F8运行宏等。
通常的做法是:
在AUTO.dvb模块1或ThisDrawing中添加如下代码:
Sub RunUserForm1()
UserForm1.Show
End Sub
新建一个文件acad.lsp,添加如下代码:
(defun c:run()
(vl-load-com)
(vl-vbaload(findfile "AUTO.dvb"))
(vl-vbarun "RunUserForm1")
(princ)
)
将acad.lsp和AUTO.dvb放在cad支持目录下。
在命令行输入run(此命令名称自行定义),即可启动你的窗体。
回复

相关推荐

APP内打开