AutoCAD中用VBA编程求冷冲模压力中心

随着冷冲模设计任务的增多,依靠原来的手工方法计算不仅任务繁重,而且很容易出现计算错误。基于上面情况,笔者在AutoCAD2000中用VBA编程,直接在图纸上求解压力中心,极大地降低了设计人员的工作强度。这种方法比手工方法计算更准确,也使冷冲模的寿命更长。

一、概述

冷冲模压力中心是冲裁力合力的作用点,准确求解压力中心对于冷冲模的正常工作至关重要。

在AutoCAD中,常用的求压力中心的方法是先用pedit命令将冲裁边编辑成多义线,再向两边偏移微小距离,运用一定的编辑方法围绕冲裁边形成一个狭窄封闭区域,用region命令编辑成面域,再用AutoCAD的Massprop命令求出面域质心,此质心接近压力中心。对于复杂冲裁件,上述方法操作起来比较繁琐,并且用Pedit命令编辑时要求线与线之间必须完全连接(特别是当从其他绘图软件转换过来的图形连接不是很好时,这点影响较大)。更为重要的是,每一次求解压力中心都得进行类似的繁琐工作。

基于上述原因,笔者依据最基本,也是最准确的计算法,运用AutoCAD2000下VBA编程求解冲模的压力中心,再将其做成按钮,置于查询(Inquiry)工具条上,即可在所画图形上直接求解压力中心。程序基本思路为:先选择代表冲裁边的图元对象,再逐一判断是何种对象,从而转入相应对象的计算处理。根据计算法原理,将此对象的压力中心求出,并将它们当作一个对象,与下一个对象计算,求出新的压力中心,直至处理完所有对象。最后求出的压力中心即为整个冲模的压力中心。

二、程序输入及按钮制作

(1)打开AutoCAD2000,选择工具菜单下Visualbasic编辑器,输入程序并存为Code.dvb文件(其文件位置假设为D:\presscenter\code.dvb)。完整程序参见(暂不可见)/list.asp?boardid=11

(2)选择AutoCAD工具菜单下的加载应用程序,在Startupsuite中加入保存的Code.dvb文件,关闭各对话框。以后在启动AutoCAD时,将自动加载此工程文件。

(3)打开视图菜单下工具栏(Toolbar)对话框,选取查询工具条,则查询工具条出现在界面上。接着点Customize按钮,出现Customizetoolbar对话框,在此对话框的Categories条目中选Custom,下面将出现两个空白按钮,其中一个带小三角(可用鼠标在小三角前点击,即可发现是两个按钮),将第一个空白按钮(不带小三角)拖至查询工具栏中,查询工具栏中出现一个空白按钮,此时按Custmizetoolbar对话框的Close按钮。

(4)在Toolbar对话框激活的情况下,在刚加入的空白按钮上按鼠标右键,出现Buttonproperties对话框,在Name栏输入“压力中心”字样,在Macro栏输入^c^c-vbarunD:/presscenter/code.dvb!(暂不可见)center(注意:vbarun命令前有小横线,后面要加空格,另外,路径必须是Code.dvb文件保存的路径,路径中反斜杆的方向与一般的路径表示方向相反)。再点Edit按钮,编辑按钮的图样,最后按Close按钮,并关闭各对话框,就完成了按钮的制作。以后在打开AutoCAD时,此按钮和其他工具栏按钮一样可随时起作用了。

null

声明：本网站所收集的部分公开资料来源于互联网，转载的目的在于传递更多信息及用于网络分享，并不代表本站赞同其观点和对其真实性负责，也不构成任何其他建议。本站部分作品是由网友自主投稿和发布、编辑整理上传，对此类作品本站仅提供交流平台，不为其版权负责。如果您发现网站上所用视频、图片、文字如涉及作品版权问题，请第一时间告知，我们将根据您提供的证明材料确认版权并按国家标准支付稿酬或立即删除内容，以保证您的权益！联系电话：010-58612588 或 Email:editor@mmsonline.com.cn。