加载dvb屏蔽提示

长风（尚品） 发表于 2014-1-18 12:24:56

我将dvb文件放到cad搜索路径下用
(defun S::STARTUP()
(command "_VBALOAD" "图块遮罩.dvb")
)

(load "图块遮罩【lmx-tkzz】.lsp")
个面这个加载每次打开文件或启动cad软件都会出现下面对话框。请问如何屏蔽掉这两个对话框。不再提示呢？

windowns456 发表于 2014-3-28 18:53:41

能给我发一个这个图块遮置的插件吗？谢谢858569232@qq.com

aaacjh 发表于 2014-9-14 20:13:48

我也遇到跟楼主同样的问题，每次打开文件都提示，群里开发VBA好像不太多，求解！

wzg356 发表于 2014-9-15 23:15:23

本帖最后由 wzg356 于 2014-9-15 23:20 编辑

设为命令
例子
(defun c:新命令名 ()    (command "-vbarun" "文件名.dvb!宏名称")
   (Princ)
)
注："文件名.dvb!宏名称"：在cad菜单栏：工具-宏，宏名称显示的东西填上去
下图中的例子写成
(defun c:新命令名 ()
   (command "-vbarun" "生成等高线.dvb!Module1.CeliangToolbar")
   (Princ)
)
加载后执行命令“ c:新命令名”就可以了

SunSpring 发表于 2014-9-16 16:52:55

(vl-vbaload (findfile "Project.dvb"))

(defun c:dx ()
(vl-vbarun "DrawLoc")
(princ)
)

自贡黄明儒 发表于 2014-9-16 17:33:18

加载前判断—下是否已经加载

xiaolong1487 发表于 2014-9-20 19:12:26

这个可以参考：http://bbs.mjtd.com/thread-15283-1-1.html

页: [1]

明经CAD社区's Archiver

加载dvb屏蔽提示