找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 753|回复: 1

[VBA程序]:我总结的关于vba开发cad入门的一些小问题

[复制链接]
发表于 2003-4-14 22:18:33 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
最近一直在学习cad的二次开发程序vba,有一点心得,现在把可能所有新学者都会碰到的问题总结一下,希望能给所有向我一样刚入门的朋友提供一些帮助。
    一、当要开发一个带窗体的程序时,要切记在运行程序时一定要首先把窗体隐藏,加上me.hide就可以了:)
    二、怎样用菜单调用vba宏,因为我的程序是用模块构建的,所以每个宏就代表一个任务,菜单调用命令如下:id_h10rhtz       [二号图纸(&R)]^C^C_-VBARUN rhtz,其中rhtz表示一个宏名。
     三、怎样建立快捷命令,首先要建立一个和mnu文件同名的mnl文件,内容是用lisp写的程序,如上面的二号图纸的快捷命令:

(princ "\设计工具,制作:thanksway,请登陆http://thanksway/dvbbs获得最新版本!")
(princ)
(vl-load-com)
;;自动加载VBA程序的函数
(defun AutoVBALoad (cmdname project macro)
  (eval
    (list 'defun
  (read (strcat "C:" cmdname))
  nil
  (list
    'vl-vbarun
    (strcat
      project
      "!"
      (if macro
macro
cmdname
      )
    )
  )
  (princ)
    )
  )
)

(AutoVBALoad "rh" "test.dvb" "rhtz")
当然在上一句后面可以继续写你的快捷命令。另外值得一提的是只要你的dvb文件是在cad的搜索路径里就会达到自动加载vba文件的目的。郁闷:( 输入法出了问题,明天在把怎样给dvb文件打包做成安装程序,并自动把安装目录添加到cad的搜索路径等问题详细说明以下吧:)
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2003-4-28 23:43:07 | 显示全部楼层
think you
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

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

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-12-23 10:11 , Processed in 0.392309 second(s), 33 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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