明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 3909|回复: 13

[求助]如何在cad启动后自动运行vba工程(带窗体)

  [复制链接]
发表于 2002-9-29 15:32:00 | 显示全部楼层 |阅读模式
发表于 2002-9-29 19:13:00 | 显示全部楼层

VBA工程可以利用LISP来调用执行,而LISP程序可以在启动时加载运行

发表于 2002-9-30 15:45:00 | 显示全部楼层

另外一个办法:在acad.dvb中输入call yourmacro,然后拷贝到acad2000\surport下即可

发表于 2002-10-15 22:02:00 | 显示全部楼层

如何写这个LISP程序呀

发表于 2002-10-16 08:33:00 | 显示全部楼层

应该是这样

(defun c:你的函数名()
(startapp "你的程序名 ")
发表于 2002-10-20 10:21:00 | 显示全部楼层

有误,上面写的是VB的调用,下面的才是VBA的调用

将以下程序段写在acad2000doc.lsp中:
(defun c:名称() ;要在命令行执行的命令名称
  (setvar "cmdecho" 0)
  (command "-VBARUN" "VBA工程名称.dvb!模块名.过程名")
  (setvar "cmdecho" 1)
  (princ)
)
如:
(defun c:chgarr()
  (setvar "cmdecho" 0)
  (command "-VBARUN" "chgarr.dvb!chgarr.chgarr")
  (setvar "cmdecho" 1)
  (princ)
)
 楼主| 发表于 2002-10-23 15:42:00 | 显示全部楼层

这样调用的是过程,如果调用一个窗体怎么办

发表于 2002-10-23 21:41:00 | 显示全部楼层

窗体要通过过程来调用,写一个过程吧

发表于 2004-6-14 10:30:00 | 显示全部楼层
userForm1.show
发表于 2004-6-14 11:20:00 | 显示全部楼层
如果不复制到支持目录下可以在ACAD2005.LSP加入:

(command "-vbarun" "d:\\**\\**.dvb!模块名.过程名")

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-28 03:30 , Processed in 0.209255 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表