基于VB和ANSYS的钻柱振动软件开发.pdf

《基于VB和ANSYS的钻柱振动软件开发.pdf》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、·信息技术·徐鹤林，等·基于VB和ANSYS的钻柱振动软件开发基于VB和ANSYS的钻柱振动软件开发徐鹤林，许福东。徐桃园，胡霞(1．长江大学机械工程学院，荆州434200；2．第四石油机械厂，荆州434024；3．西南石油大学，成都610500)摘要：利用VB及ANSYS参数化设计语言，开发了钻柱有限元模型自动生成、受力及振动分析系统，实现了钻柱结构尺寸、钻柱组合和钻井工艺条件的参数化处理。该系统具有友好、方便、易用的人机交互界面，并对ANSYS命令流进行后台封装，可以让非专业人员容易操纵，具有一定的现场指导价值。关键词：VB；ANSYS；钻柱；有限元中图分类号：TH

2、16；TP311．52文献标志码：B文章编号：167l3276(2011)02-008l-03SoftwareDevelopmentofDrillingStringVibrationBasedonVBandANSYSXUHe—lin，XUFu．dong，XUTao—yuan，HUXia(1．SchoolofMechanicalEngineeringYangtzeUniversity，Jingzhou434200，China；2．PetroleumMachineryCO．，Jingzhou434024，China；3．SouthwestPetroleumUniversit

3、y，Chengdu610500，China)Abstract：ThispaperusesVBandNSYSparametricdesignlanguagetodevelopsthefiniteelementmodalandanalyticsystemofthestressandvibrationofadrilingstring．Theparametricprocessingofdrillingstringsize，drillingstringcombinationanddrillingprocessconditionisfulfilledtoo．Thissystemha

4、safriendandeasyman·machineinterfacesothatnon·professionaliseasytomanipulateitbyu-singbackgroundpackagingtechnologytocarryoutANSYScommandstream．inaword，thissystemhassomeol3一siteguidancevalue．Keywords：VB；ANSYS；drilingstring；finiteelement上述的运行程序可以用软件结构表示(图1)。0引言I输人参数IVB是目前较为流行的应用程序可视化开发的工具之

5、lVB传递一生成ANSYS的APDL文件，在图形用户界面开发方面有突出的优势。由于VB‘具有易学易用、功能强大、移植性强等特点，应用其进行深VB调用ANSYS并运行APDL文件入开发研究的工作是越来越多、范围也是越来越广L2-3J。+同样，ANSYS也是有限元分析软件最为权威、流行、强大的软件之一，它普遍应用于工程实际中。。利用VB丰富的窗口界面，以ANSYS为内核，将二者的优势有效的结l保存结果为TxT文件合起来，开发了一套应用于钻井工程的系统，该成果具有‘一定的工程使用价值。VB调用该TxT文件并绘图+1软件系统简介保存图片并退出序该系统的主要内容包括两方面：固有频

6、率的计算及振图1软件结构示意图型显示；谐响应分析。1．1软件结构1．2软件的主要界面该软件的主要工作流程为：程序运行后，首先是输入文中所编写的软件主要有6个界面：主界面、钻具参钻井工艺的相关参数，如：钻具组合、钻柱结构、泥浆密数、钻柱组合、钻井工艺参数、静态分析和动态分析(动态度和钻井深度等；然后生成ANSYS的APDL文件并调用分析包括模态分析和谐响应分析)。由于篇幅所限，此处ANSYS软件执行该文件；接着将结果保存为TXT文件；仅列出两个界面，如图2和图3所示。然后VB调用该TXT文件并绘图；最后保存图片和退出程序。作者简介：徐鹤林(1985一)，男，湖北荆州人，硕

7、士，从事石油机械设计及仿真研究。M~hmeBuiMinggAu~mation，Apt2011，40(2)：81～·8l··信息技术·徐鹤林，等·基于VB和ANSYS的钻柱振动软件开发2．2VB调用ANSYSVB对ANSYS的调用属后台调用，使用到的函数是SHELL函数，具体代码为：Shell(”C：／ProgramFiles／AnsysInc／v100／ANSYS／bin／intel／ansys100．exe—b—i”&App．Path＆”／drillinganalysis．MAC—O”&App．Path＆”／drillinganalys