关于钻孔相关本科论文范文,与基于CAD开发矿产钻孔柱状图相关论文格式范文

关于钻孔及对象及模块方面的免费优秀学术论文范文，关于钻孔相关论文格式范文,关于基于CAD开发矿产钻孔柱状图相关论文范文参考文献，对写作钻孔论文范文课题研究的大学硕士、本科毕业论文开题报告范文和文献综述及职称论文参考文献资料下载有帮助。

[摘 要 ]本文阐述了VBA二次开发语言的各种优势；分析了矿产钻孔柱状图开发的总体流程图；深入剖析了程序的各种模块；希望能起到抛砖引玉的作用.

[关 键 词 ]CAD VBA 钻孔柱状图 地质矿产

[中图分类号] P634.2 [文献码] B [文章编号] 1000-405X（2013）-11-259-2

钻孔柱状图的绘制在八十年代以前主要是靠手工绘制完成的,不仅需要大量的人力物力,而且成图慢、效率低,很难满足实际生产的需要.后来

随着计算机的逐渐普及,如何利用计算机进行钻孔柱状图的快速绘制引起了地学工作者的关注,出现了一些钻井柱状图绘制软件.本文基于CAD平台,利用VBA语方开发了钻孔柱状图自动生成系统,实现了图与数据的统一[1]..

1CAD与VBA开发语言

1.1CAD成图软件

CAD主要使用交互式图形显示软件、CAD应用软件和数据管理软件3类软件.交互式图形显示软件用于图形显示的开窗、剪辑、观看,图形的变换、修改,以及相应的人机交互.为此,需要建立工程数据库系统.它同一般的数据库系统相比有如下特点：数据类型更加多样,设计过程中实体关系复杂,库中数值和数据结构经常发生变动,设计者的操作主要是一种实时性的交互处理.

1.2VBA开发语言

1.2.1对象模型

VBA是一种语言,被引用的对象模型是创建基于VBA的程序的不可缺少的部分,对象模型指明了可以控制的应用程序和功能,这样就能利用VBA访问和改变对象模型的属性值、处理对象模型中的对象所触发的事件并调用对象的方法[2].

1.2.2优越性

（1）每个VBA宿主应用程序通过一个对象模型开发它的功能,扩展基于ActiveX组件为开发者利用以创建成批的用户解决方案.

（2）开发者能更适应市场,因为他们能在许多应用程序中运用他们的技术.有助于开发者在各种应用程序中只使用一种语言,只需了解该应用程序的对象模型.

（3）复用代码的能力是一个优势,因为相同的VB能在任何地方使用[3].

（4）VBA能够使得应用程序定制以提供满足用户需求的解决方案.

2总体流程图

基于CAD开发矿产钻孔柱状图总体结构,如图1所示.

3程序实现

3.1ACCESS报表模块

钻孔地质数据都要求以统一的标准（关系数据库）进行存储.应用程序如果不支持直接对这种标准的数据库进行读取,那么应用程序就没有了通用性,即用户直接对海量的钻井数据进行转换格式也是相当困难的,并且容易出错.所以,应用程序本身必须能够读取这种标准关系数据库中的数据.

模块程序的部份代码如下所示：

Private Sub AppendButton_Click（）

Dim sFiles（）As String

TreeSearch"c：＼123","xls",a（）

Dim strcopy As String

If pasteText.Text等于""Then

Exit Sub

End If

3.2花纹库模块

地质岩性花纹复杂多样,如何实现岩性花纹的管理和自动填充是钻孔柱状图自动绘制的重要内容.模块程序的部份代码如下所示：

For i等于0 To lstFile.ListCount-1

Call CheckTextHeight22（lstFile.List（i））

Next i

If i >等于0 Then

MsgBox"程序处理了"& i &"个文件,谢谢你的使用!"

End If

3.3剖面信息模块

剖面图又称剖切图,是通过对有关的图形按照一定剖切方向所展示的内部构造图例,剖面图是假想用一个剖切平面将物体剖开,移去介于观察者和剖切平面之间的部分,对于剩余的部分向投影面所做的正投影图.

3.4图面整饰模块

（1）文字标注处理

绘制好柱状图框架以后,要在程序中创建一个“注释”字段,用来存储每个矩形所要显示的内容.

（2）岩性图例块的插入

不仅需要对钻孔柱状图进行文字标注,还需要对“柱状图”层进行岩性填充.

根据《地质矿产测量图例》的地层内容,对岩性图例进行分类,通过不同的方法实现,形成岩性图例库.可以直接调用岩性图例库按属性数据插入外部块,以实现钻孔各岩性的填充.

模块程序的部份代码如下所示：

If TypeOf t Is AcadText Or TypeOf t Is AcadMText Then

If （txt3等于"绘图员"）Then Text333