基于AutoCAD二次开发的矿山软件功能实现.pdf

《基于AutoCAD二次开发的矿山软件功能实现.pdf》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、SerialNo．544现代矿业总第54期August．2014MODERNMINING2014年8月第8期基于AutoCAD二次开发的矿山软件功能实现芦磊(云南锡业股份有限公司大屯锡矿)摘要为了满足矿山实际工作需要，通过采用VBA编写相应程序，对AutoCAD进行二次开发，实现了部分矿山地质、矿山工程辅助功能，对于降低矿山技术人员工作难度，提高工作效率具有一定的作用。关键词AutoCAD二次开发VBA矿山地质功能矿山工程辅助功能AutoCAD作为一款在机械制图、建筑设计等方2程序代码及功能实现面常用的专业软件

2、，具有操作灵活、制图速度快等特2．1程序代码点，广泛应用于矿山工程制图。但AutoCAD相对根据不同的专业需求，分别编写程序实现相应MapGIS等软件而言，在使用的过程中，无法满足一的功能，并通过加载工具栏进行运行。程序能够自些较为专业的功能需求。因此，结合矿山实际工作动判断电脑使用的AutoCAD和Office软件版本，引需要，采用VBA语言对AutoCAD进行二次开发，对用相应的库文件，进行初始化，并生成工具栏以供使一些矿山地质和矿山工程辅助功能进行了实现。用，部分代码如下：1开发工具的选择ForEachr

3、efInThisDrawing．Application．VBE．AutoCAD常用的开发工具有AutoLisp／VisualVBProjects(1)．ReferencesLisp，ObjectARX、VBA等，其中，ObjectARX对Auto-Ifref．Name=”Excel”ThenCAD有着最深入的控制能力，运行效率最高，能够Ifref．isbrokenThen访问许多AutoCAD许多底层的工具。但需要编程ThisDrawing．Application．VBE．VB—人员对C／C++语言有着较高的要

4、求，且开发时间Projects(1)．References．Removeref较长，因此，矿山工程技术人员使用C／C++语言难Else度相对较大。bolFindAdo=TrueAutoLisp／VisualLisp脚本语言相对于C／C++ExitFor较易学习，有着大量的Lisp程序库可以参照，降低了EndIf编程的难度。但与Office和数据库交互比较繁琐，难EndIf以适应矿山工程中所涉及的大量繁琐的计算任务。NextAutodesk公司从AutoCADR14．01版开始，内ⅡbolFindAdo=Fals

5、eThen置了VBA(MicrosoftVisualBasicforApplication)开IfLeft(Exce1．Application．Version，2)=发工具，同时提供了ActiveXAutomation对象模型。”15”Then引用Excel2013类库VBA语言的学习难度最低，通过SendCommand方法ThisDrawing．Application．VBE．VBProjects可以使用AutoLisp代码，获得其图形操作的优点，同(1)．References．AddFromGuidGUID

6、：=”{00020813时与Office软件及数据库的交互非常方便。—0000—0000一C000—000000000046}”，Major=AutoCAD中通过自带的VBE编写程序，最终生成为1，Minor=8宏(．dvb文件)，无需安装，方便应用，后期对程序维Elseif⋯⋯引用其他版本的MicrosoftExcel护比较简单，较适合矿山工程技术人员使用。ObjectLibraryEndIf芦磊(1986一)，男，助理工程师，661000云南省红河州个旧市EndIf大屯镇。17】总第544期现代矿业2014

7、年8月第8期级叶轮既是工作轮又互为导叶，提高了风机运行效装角度或变频调速来调节工况。对于该矿井，由于率，通风机设有回流环，有效地消除了喘振。该型风通风容易时期和通风困难时期负压变化较大，采用机采用反转反风并配带防爆制动器、电动蝶阀风门、调整叶片安装角度调节工况时，通风容易时期风机消音器、扩散筒等，具有安装简单、施工周期短等优运行效率为76％，能耗为0．4267kWh／10。m。Pa，点。但由于通风机电动机安装于风机轮毂内，叶轮电费约为658万a(电价按0．5Y~／kWh计)；采安装于电动机轴上，需要装设隔爆电动

8、机，电机的散用变频调速时，通风容易时期风机运行效率高达热效果差，设备价格高。叶片调节方式为停机逐个87．5％，能耗为0．4004kWh／10。mPa，电费约为调节叶片角度，操作时间长，叶片角度的一致性不易620万a。由此可见，采用变频调速后，风机运行控制。效率更高，节约电费38万Yr．／a。根据以上从投资、管理、可靠性等方面对4种主另外，由于矿井实际风量、负压与理论计算可能要的矿井通风