查看单个帖子
旧 2009-04-27, 05:57 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】autocad多功能插件,vba源代码。今年的毕业设计

autocad多功能插件,vba源代码。今年的毕业设计
www.dimcax.com
autocad多功能插件,vba源代码。今年的毕业设计
图片:

图片:

图片:

图片:

图片:

图片:

能画中心线,内螺纹,外螺纹,罗纹通孔,螺纹不通孔,表面粗糙度,基准,标注序号,自动生成图框,标题栏和明细表,能方便修改标题栏和明细表中的内容,能将输出明细表到excel文件。还有一些标注件库。
1.解压,点击《破碎机械cad.exe》启动autocad
2.使用menu命令加载acad.mns,菜单栏改成汉化版!
3.使用vbaload命令加载宏文件acad.dvb
4.按alt+f11键进入visual basic编辑器,修改a2titlebox和a4tablebox中
fpath = "f:\毕业设计\终极版\cad图纸\gbtitle.dwg"(标题栏块文件)
fpath = "f:\毕业设计\终极版\cad图纸\gbtable0.dwg"(明细表表头块文件)
fpath = "f:\毕业设计\终极版\cad图纸\gbtable.dwg"(明细表表行块文件)
将这个路径改为存放gbtitle.dwg、gbtable0.dwg、gbtable.dwg文件的路径就可以了。语句为放置标题栏和明细表块文件的路径!
ps: 如果不能用,欢迎批评指正!
本帖最近评分记录:
金钱:+20(tandongchi) 鼓励鼓励

fpath = "f:\毕业设计\终极版\cad图纸\gbtitle.dwg"(标题栏块文件)
fpath = "f:\毕业设计\终极版\cad图纸\gbtable0.dwg"(明细表表头块文件)
fpath = "f:\毕业设计\终极版\cad图纸\gbtable.dwg"(明细表表行块文件)
我对vba不太懂,你说的哪个fpath在什么地方!

:
fpath = "f:毕业设计终极版cad图纸gbtitle.dwg"(标题栏块文件)
fpath = "f:毕业设计终极版cad图纸gbtable0.dwg"(明细表表头块文件)
fpath = "f:毕业设计终极版cad图纸gbtable.dwg"(明细表表行块文件)
我对vba不太懂,你说的哪个fpath在什么地方!
在a2titlebox和a4tablebox模块中,你找找应该能找到的!

:
为什么打开是乱码啊 ?
我没碰到着中问题,所以不能给你解答!

开是乱码啊

:
开是乱码啊
不是吧,怎么会是乱码呢?
你autocad装了吧,

不能直接双击打开,需要加载到autocad里面打开才行,要不然打开就成乱码了!

毕业设计时,做二次开发很有用哦!

这个比较有用,可以借鉴一下

我正要找这样的工具,真是谢谢了。

本来是想弄几张图片让大家看看效果,可网易相册里的图片不能在别的网站利用!
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)