资源描述：
《基于vb控件开发的ansys程序调用方法》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、交通科学武汉理工大学学报()第28卷 第1期与工程版Vol.28No.12004年2月JournalofWuhanUniversityofTechnologyFeb.2004(TransportationScience&Engineering)基于VB控件开发的ANSYS①程序调用方法彭公孚 席长友(武汉理工大学交通学院 武汉 430063)(山东省曲阜公路局 曲阜 273100)摘要:在ANSYS软件的模板二次开发过程中,调用ANSYS进行自动计算是开发的关键步骤,而开发工具的不同造成了调用的方法不同.文中讨论用Vi
2、sualBasic语言编写的一种控件,将调用ANSYS程序的功能封装起来,供各种语言使用,希望藉此控件在各种开发情况下为开发者提供一个统一有效的调用接口.结合一个实例对其使用方法进行了介绍.关键词:控件;ANSYS;调用中图法分类号:U412.6ANSYS软件在工程上的应用相当广泛,在户输入的参数生成ansys宏命令文件;(3)将生机械、电机、土木、电子及航空等不同领域的使用,成的宏命令文件提交给Ansys程序进行批处理[1]都能达到某种程度的可信度,颇获各界好评.因操作;(4)程序需要判断Ansys的批处理操作何其功能强大结果可
3、靠,ANSYS软件在工程上的时结束.应用相当广泛.很多人在其基础上进行模板二次ANSYS程序调用的关键是第(3)、(4)步,将开发以简化具体工作中的机算问题.在这一过程这两步工作封装在一个可以由多种开发工具调用中解决主程序对ANSYS的调用功能成为开发的的控件中,供开发者使用,这将简化开发程序的代关键.各种开发工具都有其各自的方法,造成在各码.具体步骤如下.个开发过程中开发者需要采用不同的方法重复工1.23.log文件的提交作.为了解决这一问题,笔者提出了基于VB控件首先在VB开发环境中生成一个普通工程,开发的ANSYS程序调用方
4、法.然后执行“文件”菜单中的“添加工程”命令,打开“添加工程”对话框并在其中选择“ActiveX控1 基于VB控件的ANSYS软件件”并确定.在建立的控件设计器中添加一个命令按钮和一个计时器,然后调整为合适大小并设置1.1 基本原理相应各种属性,注意要将计时器的Enabled属性每运行一次ANSYS生成一段3.log文件,设置为Flase;Interval属性设置为3000.该文件记录了ANSYS运行过程中的每一个命 在按钮控件中添加如下代码PrivateSubCommand1Click()令,以便在系统崩溃或用户发生重大错误时
5、,用Dimxöinput命令调入3.log文件重新执行命令,并且x=Shell“(X:ø⋯⋯øAnsysIncøANSYS57øbinøintelANSYS为使用者提供了batch功能,利用此功能øansys57.exe-g-iY:ø⋯⋯ø&inputname&-oY:ø可以实现3.log文件的后台调用,利用这一功⋯⋯ø&outputname&”)能,可以利用自己熟悉的编程软件修改3.log文Timer1.Enabled=True件中相应的参数,并调用ANSYS程序计算,在主EndSub程序的调用过程中主程序必须实现以下4种功其中
6、:X:ø⋯⋯ø为Ansys安装路径;Y:ø⋯⋯ø为能:(1)要实现前处理参数输入功能;(2)根据用输入、输出文件的放置位置;&inputname&和①收稿日期:20031027 彭公孚:男,25岁,硕士生,主要研究领域为计算力学与仿真©1995-2005TsinghuaTongfangOpticalDiscCo.,Ltd.Allrightsreserved.第1期彭公孚等:基于VB控件开发的ANSYS程序调用方法·149·&outputname&是用APDL语言编写的ANSYS③-74.726,-22.881,0;④-71.
7、687,-20.945,0;输入文件名和结果输出文件名.⑤-68.603,-19.083,0;⑥-65.475,-17.295,0;1.3 判断ANSYS计算结束⑦-62.304,-15.584,0;⑧-59.091,-13.953,0;在计时器中添加如下代码⑨-55.839,-12.403,0;bk-52.548,-10.937,0;bl-49.220,-9.556,0;bm-45.857,-8.263,0;PrivateSubTimer1Timer()bn-42.461,-7.059,0;bo-39.034,-5.945,0;
8、IfDir“(Z:ø⋯⋯øfile.err”)<>“”Thenbp-35.579,-4.924,0;bq-32.098,-3.996,0;MsgBox“计算完毕(!”)br-28.593,-3.162,0;bs-25.066,-2.425,0;Ti
