CAD在工程实践中的二次开发

1、摘 要为了解决困困扰工程地地质界的隧隧道地质编录绘绘图难题，探探索实现隧隧洞设计及及施工地质质展示图绘绘图自动化化和计算机机化的可能能途径，本本文以田坝坝岭隧道施施工地质为为范例，说说明铁路隧隧道地质编编录自动成成图系统概概念和实施施要点，通通过对AuutoCAAD平台的的二次开发发最终实现现自动成图图的目的。通过本设计计过程，使使学生掌握握计算机辅辅助设计的的基本技能能，并具备备AutooCAD二二次开发的的初步技能能，提高其其应用计算算机解决实实际问题的的能力水平平，预期达达到以下要要求：熟练练掌握AuutoCAAD平台AAxtivvex 开开发技术；初步具备备利用关系系型数据库库管理工程

2、程数据的能能力。本设计可以以实现加入入窗体模块块编程，每确认一一个窗体模模块即可实现一一项模块功功能。使工作量由由软件从已已编写的数数据库文件中提提取数据自自动生成图图形。用铁铁路隧道地地质编录自自动成图系系统绘制隧隧道展示图图比手工快快几十倍甚甚至更多。关键词：地地质展示图图 数据库库 二次开开发 AbstrractIn orrder to ssolvee thee trooublee DeZZhiJiie tuunnell enggineeeringg geoologiical recoord ddrawiing pprobllem, expllore and reallize tunnn

3、el iin thhe deesignn andd connstruuctioon off geoologiical dispplay figuure ddrawiing aautommatioon annd coomputterizzed ppossiible apprroachh, baased on tthe ttunneel coonstrructiion ggeoloogicaal fiield dam as aan exxamplle, eexplaain rrailwway ttunneel geeologgicall reccord to bbe auutomaatic map

4、pping systtem cconceept aand tthe kkey ppointts, rrealiized throough to tthe sseconnd deeveloopmennt AuutoCAAD pllatfoorm eeventtuallly reealizze thhe puurposse off auttomattic mmappiing.Throuugh tthe ddesiggn prrocesss, mmake the studdentss masster the basiic skkillss of compputerr aidded ddesiggn,

5、 aand wwith AutooCAD secoondarry deeveloopmennt prrelimminarry skkillss, immprovve itts apppliccatioon coomputter ssoluttion actuual pprobllem aabiliity llevell, exxpectted tto reeach the folllowinng reequirremennts: mastter AAutoCCAD pplatfform deveelopmment techhnoloogy AAxtivvex; Inittiallly haav

6、e uuse oof reelatiionall dattabasse maanageementt enggineeeringg datta abbilitty.This desiign ccan rrealiize tto jooin fform moduule pprogrrammiing, eachh connfirmmed aa forrm moodulee cann be reallizedd a mmodulle fuunctiion. Makee worrk frrom aalreaady wwrittten bby sooftwaare ddatabbase filee ext

7、tractt datta auutomaaticaally geneeratee graaphiccs. UUse rrailwway ttunneel geeologgicall reccord to bbe auutomaatic mappping systtem ddraw tunnnel sshow thann a ffew ttimess fasst fiiguree by evenn morre.Key wword ：Geoologiical dispplay figuure dataabasee Seecondd devveloppmentt目 录TOC o 3-3 h z t

8、标题 1,1,标题 2,2,参考文献之后,1 HYPERLINK l _Toc332596667733 第 1 章 绪 论 PAGEREF _Toc325966773 h 1 HYPERLINK l _Toc325966774 1.1 开开发的意义义、背景 PAGEREF _Toc325966774 h 1 HYPERLINK l _Toc325966775 1.2 本本设计解决决的问题 PAGEREF _Toc325966775 h 1 HYPERLINK l _Toc325966776 1.3 采采用的方法法和步骤 PAGEREF _Toc325966776 h 2 HYPERLINK l

9、 _Toc325966777 1.3.11 方法 PAGEREF _Toc325966777 h 2 HYPERLINK l _Toc325966778 1.3.22 步骤 PAGEREF _Toc325966778 h 2 HYPERLINK l _Toc325966779 1.4 预预期成果 PAGEREF _Toc325966779 h 3 HYPERLINK l _Toc325966780 第 2 章章 数据库库结构设计计 PAGEREF _Toc325966780 h 4 HYPERLINK l _Toc325966781 2.1 数数据库中的的表 PAGEREF _Toc32596

10、6781 h 4 HYPERLINK l _Toc325966782 2.2 数数据库中表表的关联图图 PAGEREF _Toc325966782 h 7 HYPERLINK l _Toc325966783 第 3 章章 程序结结构 PAGEREF _Toc325966783 h 9 HYPERLINK l _Toc325966784 3.1 模模块 PAGEREF _Toc325966784 h 9 HYPERLINK l _Toc325966785 3.1.11 Caiidan 模块 PAGEREF _Toc325966785 h 9 HYPERLINK l _Toc325966786 3

11、.11.2 CCaidaanxiaanshii 模块 PAGEREF _Toc325966786 h 9 HYPERLINK l _Toc325966787 3.1.33 CommmASSS 模块 PAGEREF _Toc325966787 h 10 HYPERLINK l _Toc325966788 3.1.44 DZSSub 模模块 PAGEREF _Toc325966788 h 10 HYPERLINK l _Toc325966789 3.2 窗窗体 PAGEREF _Toc325966789 h 10 HYPERLINK l _Toc325966790 3.2.11 工程管管理窗体 P

12、AGEREF _Toc325966790 h 10 HYPERLINK l _Toc325966791 3.2.22 工程数数据管理窗窗体 PAGEREF _Toc325966791 h 11 HYPERLINK l _Toc325966792 3.2.33 平面数数据管理 PAGEREF _Toc325966792 h 12 HYPERLINK l _Toc325966793 3.2.44 岩性表表的管理 PAGEREF _Toc325966793 h 13 HYPERLINK l _Toc325966794 3.2.55 编录出出图 PAGEREF _Toc325966794 h 13 H

13、YPERLINK l _Toc325966795 3.2.66 打印 PAGEREF _Toc325966795 h 14 HYPERLINK l _Toc325966796 第 4 章章 重点算算法 PAGEREF _Toc325966796 h 15 HYPERLINK l _Toc325966797 4.1 平平面线路方方位角的计计算 PAGEREF _Toc325966797 h 15 HYPERLINK l _Toc325966798 4.1.11 任意里里程的方位位角计算 PAGEREF _Toc325966798 h 15 HYPERLINK l _Toc325966799 4.

14、1.22 线路走走向计算 PAGEREF _Toc325966799 h 16 HYPERLINK l _Toc325966800 第 5 章章 主要应应用技术 PAGEREF _Toc325966800 h 19 HYPERLINK l _Toc325966801 5.1 AADO技术术简介 PAGEREF _Toc325966801 h 19 HYPERLINK l _Toc3259666802 5.1.1 Coonnecctionn 连接对对象 PAGEREF _Toc325966802 h 19 HYPERLINK l _Toc325966803 5.1.22 Reccordsset对

15、象象 PAGEREF _Toc325966803 h 20 HYPERLINK l _Toc325966804 5.2 AAutoCCAD VVBA 简简介 PAGEREF _Toc325966804 h 23 HYPERLINK l _Toc32259666805 5.2.1 什么么是 AuutoCAAD VBBA PAGEREF _Toc325966805 h 23 HYPERLINK l _Toc325966806 5.2.22 用 VBBA 管理理器组织工工程 PAGEREF _Toc325966806 h 24 HYPERLINK l _Toc325966807 5.2.33 处理宏

16、宏 PAGEREF _Toc325966807 h 25 HYPERLINK l _Toc32596668088 5.2.4 VBBA IDDE 编辑辑工程 PAGEREF _Toc325966808 h 26 HYPERLINK l _Toc325966809 第 6 章章 工程实实例 PAGEREF _Toc325966809 h 28 HYPERLINK l _Toc325966810 6.1 工工程名称的的录入 PAGEREF _Toc325966810 h 28 HYPERLINK l _Toc325966811 6.2 岩岩性表设置置 PAGEREF _Toc325966811 h

17、 29 HYPERLINK l _Toc325966812 6.3 平平面数据录录入 PAGEREF _Toc325966812 h 29 HYPERLINK l _Toc325966813 6.4 工工程地质数数据录入 PAGEREF _Toc325966813 h 31 HYPERLINK l _Toc325966814 6.5 编编录出图 PAGEREF _Toc325966814 h 37 HYPERLINK l _Toc325966815 第 7 章章 结 论 PAGEREF _Toc325966815 h 39 HYPERLINK l _Toc325966816 7.1 最最终成果

18、 PAGEREF _Toc325966816 h 39 HYPERLINK l _Toc325966817 7.2 总总结 PAGEREF _Toc325966817 h 39 HYPERLINK l _Toc325966818 7.3 展展望 PAGEREF _Toc325966818 h 39 HYPERLINK l _Toc325966819 参考文献 PAGEREF _Toc325966819 h 40 HYPERLINK l _Toc325966820 致 谢 PAGEREF _Toc325966820 h 441 HYPERLINK l _Toc325966821 附录A 外外文资

19、料翻翻译 PAGEREF _Toc325966821 h 42 HYPERLINK l _Toc325966822 附录B 代代 码 PAGEREF _Toc325966822 h 56石家庄铁道大学毕业设计 PAGE 45绪 论 开发的意意义、背景景为了解决困困扰工程地地质界的隧隧道地质编录绘图难题，探探索实现隧隧洞设计及及施工地质质展示图绘绘图自动化化和计算机机化的可能能途径，本本文以田坝坝岭隧道施施工地质为为范例，提提出了铁路路隧道地质质编录自动动成图系统统概念和实实施要点，实实现了通过对AAutoCCAD平台台的二次开开发最终实实现自动成成图的目的的。 本设计解解决的问题题通过对Auu

20、toCAAD平台的的二次开发发，完成“铁路隧道道地质编录录自动成图图系统”开发。解决决的问题包包括：（1）线路路平面数据据管理模块块设计、实实现先在数据库库里建立平平面数据曲曲线的参数数表把平面面数据管理理起来，然然后在VBA中中设计窗体体和模块。用窗体代代码把数据据管理起来来，模块代代码负责显显示工具栏栏菜单和下下拉菜单。在CommmASS模模块中编写写公共过程程用来调用用数据库、执行SQQL语言的的代码；在在窗体里编编写可以执执行添加、删除和更更改，可以以显示起点点和终点的的坐标里程程且可以更更改数据的的代码。（2）地质质编录数据据管理模块块设计、实实现为了使平面面线路与其其相应的地地质情

21、况连连接起来我我们需要把把设计、施施工时的地地质信息录录入到数据据库表中，为为此需要设设计两个表表和一个窗窗体来实现现本功能。这两个表表与namme和xiianluu表通过EE_ID建建立主键关关系使得工工程名称、线路特征征、地质情情况连接起起来。而窗窗体任然是是对表进行行修改的一一个工具。在数据库里里建立shheji和和shiggong两两个表，这这两个表管管理设计和和施工的地地质信息。在AuttoCADD操作系统统中建立窗窗体和模块块，地质编编录数据管管理模块是是要把施工工和设计时时隧道各个个断面的地地质情况记记录到表中中，并且可可以通过窗窗体对其进进行操作。同样应用用了CommmASSS

22、模块中编编写公共过过程调用数数据库、执执行SQLL语言的代代码；窗体体里编写可可以执行添添加、删除除和更改数数据的代码码。（3）填充充图例管理理模块设计计、实现填充管理模模块用来实实现管理岩岩石特性的的功能。为为此我们搜搜集了一个个比较齐全全的岩性库库，然后在在数据库里里建立表yyanxiing，用用CommmASS模模块中GeetWorrkPatth过程调调用岩性库库中我们使使用的岩性性添加到yyanxiing表中中。具体操操作：在数据库里里建立yaanxinng表，这这个表管理理岩石特性性的信息。在AuttoCADD操作系统统中建立窗窗体和模块块，填充图图例管理模模块是要把把隧道的地地质岩

23、性管管理到yaanxinng表中，并且可以以通过窗体体对其进行行操作。同同样我们在在这里应用用了CommmASSS模块中编编写公共过过程调用数数据库、执执行SQLL语言的代代码；窗体体里编写可可以执行添添加、删除除和更改填填充比例的的代码。（4）自动动绘图模块块设计、实实现自动绘图要要实现输入入任意一段段里程后计计算机自动动绘制展示示图的功能能。为此我我们需要设设计一个窗窗体，而且且此模块需需要在DZZSub里里编写绘制制图框、字字体、调用用展示图投投影岩性的的代码。具具体操作：在AutooCAD操操作系统中中建立窗体体和模块，自自动绘图管管理模块是是要把隧道道的投影图图绘制出来来，并且可可以

24、通过窗窗体对其进进行操作。在CommmASS模模块中编写写公共过程程调用数据据库、执行行SQL语语言的代码码；DZSSub模块块里编写字字体、编写字体体边框线、展示图图图框定位、展示图文文字定位、调用数据据库表里的的字段记录录信息等。窗窗体里编写写可以输入入任意起始始里程、终终止里程以以及是否绘绘制展示图图及填充物物的代码。（5）控制制模块设计计、实现控制模块主主要是通过过对全局的的调整实现现以上几个个模块的链链接，通过过调试使程程序运用更更加的方便便。 采用的方方法和步骤骤方法铁路隧道地地质编录自自动成图系系统开发就就是在可视视开发工具具提供的图图形用户界界面上，通通过操作界界面元素，诸诸如

25、菜单、按钮、对对话框、编编辑框、单单选框、复复选框、列列表框和滚滚动条等，由由可视开发发工具自动动生成的 HYPERLINK /view/7886.htm 应用软件件。步骤软件开发流流程一般分分为以下六六步：（1）相关关系统分析析和应用需需求的初步步了解需求求，然后用用WORDD列出要开开发的系统统的大功能能模块，每每个大功能能模块有哪哪些小功能能模块，对对于有些需需求比较明明确相关的的界面时，在在这一步里里面可以初初步定义好好少量的界界面。（2）系统统分析深入入了解和分分析需求，根根据自己的的经验和需需求用WOORD或相相关的工具具再做出一一份文档系系统的功能能需求文档档。这次的的文档会清清

26、楚例用系系统大致的的大功能模模块，大功功能模块有有哪些小功功能模块，并并且还例出出相关的界界面和界面面功能。（3）系统统分析和用用户再次确确认需求。（4）系统统分析根据据确认的需需求文档所所例用的界界面和功能能需求，用用迭代的方方式对每个个界面或功功能做系统统的概要设设计。（5）系统统分析把写写好的概要要设计文档档，根据所所例出的功功能一个一一个的编写写。（6）测试试编写好的的系统。使使用该程序序，一个一一个的确认认每个功能能。 预期成果果通过本设计计过程，使使学生掌握握计算机辅辅助设计的的基本技能能，并具备备AutooCAD二二次开发的的初步技能能，提高其其应用计算算机解决实实际问题的的能力

27、水平平，预期达达到以下要要求：（1）熟练练掌握AuutoCAAD平台AAxtivvex 开开发技术；利用AuttoCADD平台Axxtiveex开发技技术，在AAutoCCAD里实实现了添加加工具栏“地质编录录”菜单项，在在菜单项编编写下拉菜菜单记录数数据最终实实现自动绘绘制展示图图的目的。（2）初步步具备利用用关系型数数据库管理理工程数据据的能力数据库里表表建立联系系图约束数数据的变化化，使数据据库中的表表成为一个个不可分离离的整体执执行任务。数据库结构构设计为了使工作作简单化，我我们现将平平面线路所所测数据、沿线围岩岩级别及地地质情况描描述录入数据库库，这样将将具体情况况数据化，然后将数据

28、从数据库中调用并在AutoCAD中应用VBA绘制地质情况展示图。 数据库中中的表本设计所解解决的问题题是使隧道道中绘制复复杂展示图图的工作简简便，为此此我们在SSQL数据据库中建立立一个数据据库将线路路的信息分分类记录到到表格中。下面是本本程序解决决问题时需需要在数据据库中所建建立的几个个表及其内内容的具体体介绍。本工程所建建立的数据据库中有77个表组成成，表名分分别为Naame、sshejii、shiigongg、weiiyanffenjii、xiaanlu、yanxxing、YT。以以下是几个个表的主要信信息（1）Naame表主主要记录了了工程的名名称、工程程的里程信信息。并详详细记录了了

29、字段名称称、类型、定义、主主键名称等等。其中，EE_ID表表示工程的的地址，不不同的工程程用不同的的E_IDD来区分；ENAMME表示工工程名称，不不同工程名名称用不同同的E_IID表示；EPNAAME表示示工程打印印名称；EEFX表示示是否反向向；LC表表示工程包包含的里程程，详细信信息见表22-1 。表2-1 Namme（工程程名称）表表包括的字字段及内容容字段数据类型定义备注E_IDInt工程地址主键ENAMEEnvarcchar(50)工程名称EPNAMMEnvarcchar(50)工程打印名名称EFXbit反向LCnvarcchar(15)工程里程（2）Shheji表表主要记录录了平

30、面线线路沿线的的地质水文文情况，EE_ID表表示某个工工程对应的的水文地质质情况；GGWID表表示不同水水文地质的的分界标识识；GWQQZ表示工工程水文地地质里程的的前缀（DDK）；GGWM表示示工程水文文地质的描描述信息；GWLCC不同工程程水文地质质情况分界界的里程，详细信息息见表2-2。表2-2 sheeji（地地质描述）表表包括的字字段及内容容字段数据类型定义备注E_IDint工程地址GWIDint工程水文地地质地址续表2-2主键GWQZnvarcchar(10)工程水文地地质前缀GWMdecimmal(118, 00)工程水文地地质描述GWLCnvarcchar(200)工程水文地地

31、质里程（3）Shhigonng表主要要记录了沿沿线施工时时的地质情情况，E_ID表示示不同的工工程地址；DM_IID表示施施工时的隧隧道断面划划分地址；DMDCC表示施工工时隧道断断面的地层层岩性特征征；DMSSW表示施施工时隧道道断面的水水文情况；DMGCC表示隧道道断面工程程地质特征征；DMCCZ隧道断断面施工时时隧道初期期支护的概概述；DMMLC表示示施工隧道道断面的里里程；DMMC施工时时隧道断面面的围岩级级别；DMMQZ表示示施工时隧隧道断面的的里程前缀缀（DK），详细信息见表2-3。表2-3 shiigongg（线路里里程上的地地质情况）表表包括的字字段及内容容字段数据类型定义备注

32、E_IDInt工程地址DM_IDDInt线路里程地地址主键DMDCnvarcchar(100)地层岩性特特征DMSWnvarcchar(100)水文地质特特征DMGCnvarcchar(100)工程地质特特征DMCZnvarcchar(100)初期支护概概述DMLCdecimmal(118, 00)线路里程DMCnvarcchar(20)施工围岩级级别DMQZnvarcchar(10)线路里程前前缀（4）Weeiyannfenjji表主要要记录了在在设计线路路时各个工工程上的地地质变化、围岩级别别变化的分分界里程。其中，EE_ID表表示某个工工程里围岩岩级别的变变化情况；WCC表表示某工程程的

33、围岩级级别变化情情况；WCCID表示示围岩级别别变化处的的地址；WWCLC表表示围岩级级别变化处处的里程；WCQZZ围岩级别别里程前缀缀（DK），详细信息见表2-4。表2-4 weiiyanffenjii（围岩分分级）表包包括的字段段及内容字段数据类型定义备注E_IDInt工程地址WCCsmalllint围岩级别WCIDInt围岩分级地地址主键WCQZnvarcchar(10)围岩级别前前缀WCLCdecimmal(118, 00)围岩级别里里程（5）Xiianluu表主要记记录了平面面线路中曲曲线的特征征值，E_IDD表示某工工程对应的的平面线路路的曲线特特征；JDD_ID表表示本工程程里线

34、路走走向变化的的点（交点点）信息；X表示平平面线路交交点的横向向坐标值；Y表示平平面线路交交点的纵向向坐标值；R表示缓缓和曲线中中圆曲线半半径；loo表示曲线线上的缓和和曲线长，详细信息息见表2-5。表2-5 xiaanlu(平面数据据管理)表表包括的字字段及内容容字段数据类型定义备注E_IDInt工程地址JD_IDDInt交点地址主键XReal交点的X坐坐标YReal交点的Y坐坐标RReal曲线半径lofloatt缓和曲线长长（6）Yaanxinng表主要要描述了不不同地段的的岩性特征征，YX_ID表示示岩性变化化点的地址址，通过岩岩性地址与与YT表建建立某种联联系是的不不同隧道断断面的岩性

35、性描述可以以调用此表表里的信息息；YXMMC储存了了对不同岩岩性情况的的描述；YYXTCTT表示岩性性的表示方方法；YXXTCBLL表示岩性性的比例值值，详细信息息见表2-6。表2-6 yannxingg（岩性描描述）表包包括的字段段及内容字段数据类型定义备注YX_IDDInt岩性地址主键YXMCnvarcchar(30)岩性描述YXTCTTnvarcchar(20)岩性的表示示方法YXTCBBLfloatt岩性比例（7）YTT表主要记记录各个地地段的岩性性特征及其其分界点，YX_ID表示岩性变化点的地址，通过岩性地址与YT表建立某种联系是的不同隧道断面的岩性描述可以调用此表里的信息；YTID

36、岩性特征的分界地址；YTQX表示岩性特征岩石的倾向；YTQJ表示岩性特征岩石的倾角；DM_ID隧道断面地址，详细信息见表2-7。表2-7 YT（岩岩性特征）表表包括的字字段及内容容字段数据类型定义备注YX_IDDInt岩性地址主键YTIDInt岩性特征地地址YTQXdecimmal(118, 00)f岩性特征倾倾向YTQJdecimmal(118, 00)岩性特征倾倾角DM_IDDInt隧道断面地地址 数据库中中表的关联联图上一节介绍绍了数据库库中建立的的表及其内内容，具体体这几个表表之间有什什么样的关关系，我们们是如何利利用它们发发挥作用的的呢？(1)表xxianllu里面将将E_IDD、J

37、D_ID设为为主键且EE_ID为为自动标识识列，表naame中EE_ID设设为主键，两个表通过字段E_ID建立约束关系，其中xianlu是主键表，name是外键表。强制外键约束、强制与复制，标识名称是xianlu_name_pk。只有当xianlu表里的内容清空后name表里的工程才可以删除。(2)表sshejii里面将GWIDD设为主键键并与naame表通通过字段EE_ID建建立约束关关系，其中中，sheeji是主主键表，nname是是外键表，强强制外键约约束、强制制与复制，标标识名称是是shejji_naame_ppk。只有有shejji表里的的内容清空空后namme表才可可以被删除除，否

38、则无无法对naame表进进行某些操操作。(3)表SShigoong里面面将DM_ID设置置为主键并并与namme表通过过字段E_ID建立立约束关系系，其中sshigoong是主主键表，nname是是外键表，强强制外键约约束、强制制与复制、标识名称称是shiigongg_namme_pkk。只有sshigoong表里里的内容清清空后naame表才才可以被删删除，否则则无法对nname表表进行某些些操作。(4)表wweiyaanfennji里面面将WCIID设置为为主键并与与namee表通过字字段E_IID建立约约束关系，其其中weiiyanffenjii是主键表表，namme是外键键表，强制制外

39、键约束束、强制与与复制、标标识名称是是weiyyanfeenji_namee_pk。只有weeiyannfenjji表里的的内容清空空后namme表才可可以被删除除，否则无无法对naame表进进行某些操操作。(5)表YYT里面将将YX_IID设置为为主键并与与yanxxing表表通过字段段YX_IID建立约约束关系，其其中是YTT主键表，yyanxiing是外外键表，强强制外键约约束、强制制与复制、标识名称称是YT_yanxxing_pk。只只有表YTT里的内容容清空后yyanxiing表才才可以被删删除，否则则无法对yyanxiing表进进行某些操操作。(6)表YYT里面将将YTID设设置为

40、主键键并与shhigonng表通过过字段DMM_ID建建立约束关关系，其中中YT是主键键表，shhigonng是外键键表，强制制外键约束束、强制与与复制、标标识名称是是YT_shiggong_pk。只只有YT表里的的内容清空空后shiigongg表才可以以被删除，否否则无法对对shiggong表表进行某些些操作。总的来说就就是，表YYT约束sshigoong、yyanxiing表，而而表shiigongg、sheeji、wweiyaanfennji、xxianllu分别通通过不同的的主键约束束表namme。图22-1主要要描述了表表格之间的的关系。图2-1 数据库表表的关联图图程序结构在Aut

41、ooCAD中中新建工程程，根据实实现功能的的需要在新新建工程里里建立四个个模块、六六个窗体。四个模块块名称分别别为：Caaidann、Caiidanxxiansshi、CCommAASS、DDZSubb。窗体名名称分别为为：工程管管理、工程程数据管理理、平面数数据管理、编录出图图、岩性表表管理、打打印。模块通过caiidan模模块添加菜菜单项及子子菜单项，CCaidaanxiaanshii项通过sshow显显示各个子子菜单对应应的窗体。CommmASS项项调用数据据库、工作作目录及执执行SQLL语句，DDZSubb项包含了了本次设计计的主要计计算部分。它主要包包括：图框框的绘制、字体大小小及位

42、置的的设置、里里程在那条条曲线的判判断、方位位角的计算算、断面投投影的计算算等。Caidaan 模块块模块功能说说明：本模模块属于通通用命令，主主要功能是是创建工具具栏菜单，以以及下拉菜菜单项。本模块只有有一个Innimennu过程，在在该过程里里实现了创创建新菜单单“隧道地质质编录”项的目的的，且在“隧道地质质编录”里添加了了工程管理理、数据编编录、平面面数据管理理设置、岩岩性表设置置、编录出出图、图表表打印几个个菜单项。在模块里根根据要实现现的功能编编写代码，实现创建新菜单及下拉菜单的目的。Caidan模块代码见附表3-1。Caidaanxiaanshii 模块模块功能说说明：本模模块主要

43、功功能是显示示下拉菜单单项窗体，并并实现其相相应操作的的功能函数数。本模块有两两个不同的的过程，一一个是用ffrm.SShow函函数实现工工程管理、数据编录录、平面数数据管理设设置、岩性性表设置、编录出图图几个菜单单项窗体的的显示功能能。另一个个同样也使使用了frrm.Shhow函数数实现图表表打印窗体体的显示，但但在本模块块里设置了了打印字体体及图纸的的选择，显示窗体体的代码详见附附表3-22。CommAASS 模模块模块功能说说明：本模模块主要功功能是通用用辅助，总总调用模块块用来实现现连续调用用其它几个个模块。本模块共包包括10个个过程，其其中在函 数 SeetWorrkPatth里设置

44、置工作目录录；在函数数GetWWorkPPath里里获得工作作目录；在在函数 GGetDBBNamee里获得数数据库表名名称；在函函数GettTKSiize里获获取边框尺尺寸，本过过程设置图图框选项包包括A0、A1、AA2、A33、A4图图框尺寸；在函数DDBOpeen里设置置数据库表表所在的位位置打开本本地数据库库；函数EExecuuteSQQL在本过过程里执行行SQL查查询，例如如seleect、uupdatte、deeletee、inssert语语句；函数数MakeeLCSttr本过程程主要是规规范里程书书写格式，是是里程书写写规范化；函数MaakeWCCStr里里实现了围围岩分级由由数

45、字转化化为希腊数数字的功能能；在函数数MakeeOldFFWJ里方方位角的度度数表示，模模块具体的的代码见附附表3-33。DZSubb 模块本模块包含含了图框的的绘制、字字体的大小小及定位、图框布局局的设计、方位角的的计算等程程序的编写写。这里应用了了CommmASS模模块中编写写公共过程程调用数据据库、执行行SQL语语言的代码码；DZSSub模块块里编写字字体DraawOneeTextt过程，编编写字体边边框线DrrawLiineTeext过程程，展示图图图框定位位DrawwOneZZHSK过过程，展示示图文字定定位DraawOneeZHSTText过过程，调用用数据库表表里的字段段GetJ

46、JLDMIID、GetJLLWCIDD、GetJJLWCIID_BWW、GetJJLGWIID_BWW、GetJJLDMIID_BWW的记录，编编写计算方方位角的函函数利用ggetXLLzx、getZZXzx、getQQXzx、GFfwwj、调用用函数。窗窗体里编写写可以任意意起始里程程、终止里里程，以及及是否绘制制展示图及及填充物的的代码，本本模块详细细代码见附附表3-44窗体本设计共有有7个窗体体其中一个个窗体是被被工程管理理这个窗体体添加工程程时调用的的，下面介介绍几个窗窗体的作用用。工程管理窗窗体工程管理窗窗体的作用用是实现对对工程的操操作，在本本窗体里我我们可以用用inseert语句

47、句在数据库库namee表里添加加新的工程程，用deeletee语句删除除namee表里不用用的工程，还还可以对原原有工程名名称用uppdatee语句进行行修改。窗窗体按钮布布局如图33-1所示示。图3-1 工程管理理工程数据管管理窗体本窗体主要要实现了工工程项目施施工和设计计时层面特特征、基本本特征的数数据录入，使使工程的信信息完整化化。设计时时窗体按钮钮布局如图图3-2所所示，施工工时窗体按按钮布局如如图3-33所示。图3-2 工程数据据管理-设设计本窗体同样样需要初始始化事件IInitaalizee，同时窗窗体的添加加、删除、更新、退退出等单击击事件Cllick与与工程管理理模式相同同这里

48、不再再赘述。唯唯一需要说说明的是选选择框的实实现，它需需要在窗体体初始化时时就调用否否则在文本本框里将不不能同步显显示围岩级级别。下面面代码是围围岩级别的的定义。图3-2 工程数据据管理-设设计平面数据管管理本窗体主要要实现了工工程与平面面线路的对对应关系，而而且还实现现了起点和和终点坐标标里程的更更改曲线特特征的添加加、删除和和更改。窗窗体设置及及按钮布局局如图3-3所示。图3-3 平面数据据管理里岩性表的管管理本窗体的功功能是把沿沿线地质岩岩性类型添添加到岩性性表，使数数据库数据据完整方便便绘图时调调用数据库库，窗体设设置及按钮钮布局如图图3-4所所示。图3-4 岩性表管管理编录出图通过上

49、面工工程的建立立数据的录录入我们就就可以通过过编录出图图窗体来实实现调用模模块及数据据库绘制图图形的目的的。窗体布布置及按钮钮布局如图图3-5所所示。图3-5 编录出图图打印本窗体实现现图形的打打印，窗体体设置及按按钮布局如如图3-66所示。 图 3-66打印重点算法为了实现展展示图图例例填充角度度的计算，首首先应该计计算任意一一点的方位位角，然后后根据方位位角确定线线路走向，最最后根据线线路走向确确定与沿线线隧道断面面的投影角角度，最终终实现正确确的展示图图图例填充充角度。 平面线路路方位角的的计算计算任意里里程的方位位角需要的的参数有：lo、RR、X、YY、起点里里程，将参参数代入以以下公

50、式计计算任意里里程的方位位角。任意里程的的方位角计计算参数计算圆曲线在ZZHXY坐标标下的切线线角 （4-1）缓和曲线在在ZHXY坐标标下的切线线角 （44-2）内移参数 （4-2）增值参数 （4-33）主点定位参参数缓和曲线的的切线长 （44-4）缓和曲线的的曲线长 （4-55）缓和曲线的的外失距 （4-6）计算主点里里程ZH点里程程： （44-7）HY点里程程： （44-8）YH点里程程： （44-9）HZ点里程程： （44-10）QZ点里程程： （4-111）线路走向计计算计算两点间间距和方位位角已知起点坐坐标（qxx,qy）、终点坐标标(zx,zy),求直线的的方位角 （4-12） （

51、4-13） （4-114）1）如果ddx 0,dyy 00 ，则方方位角a在在第一象限限；2）如果ddx 0,dyy 00 ，则方方位角a在在第二象限限；3）如果ddx 00 ，则方方位角a在在第三象限限；4）如果ddx 0,dyy 00 ，则方方位角a在在第四象限限；5）如果ddx 00 ，则方方位角a在在第三象限限； （44-15） （4-116）判断线路走走向：若aa0 ,说明左转转，否则右右转， 如如果a0则则转角取aa-3600的正值，否否则取a。参数计算1、圆曲线线在ZHXY坐标标下的切线线角 （44-17）2、缓和曲曲线在ZHHXY坐标标下的切线线角 （4-118）3、内移参参数

52、 （44-19）4、增值参参数 （4-20）5、缓和曲曲线的切线线长 （44-21）6、缓和曲曲线的曲线线长 （4-22）7、缓直点点坐标和里里程 （4-23） （4-24） （4-225） （44-26）1）如果且且，则所求求里程点在在直线上，2）如果 且 ，则则所求里程程点在缓和和曲线上 （4-27） （4-28）a0时，曲曲线走向=a1+；a0时时，曲线走走向=a22+；a00时，曲线线走向=aa2-。5）如果或或者，则里里程不在工工程范围6）如果，则则所求里程程在直线上上，线路走走向=a11规范方位角角方位角必须须定位在（-360,360）之之间，如果果超出此范范围则需要要修正： （4

53、4-33） （4-334）主要应用技技术 ADO技技术简介ADO是一一种为基于于Inteernett并且以数数据为中心心的应用程程序而提供供的数据访访问接口，这这种应用程程序接口和和应用程序序使用的语语言无关。通过ADDO，应用用程序可以以方便地存存取、查询询、操作数数据库中的的数据。ADO提供供了几个独独立的子对对象，利用用这些子对对象，就可可以实现对对数据库的的访问，在在这几个对对象中，CConneectioon、Coommannd和ReecorddSet对对象是整个个ADO的的核心 。Conneectioon 连接接对象 Conneectioon对象用用于建立和和管理应用用程序与数数据源

54、的连连接，也可可以用它来来执行一个个命令。想想要读取数数据库中的的数据，第第一步就是是要与数据据库取得连连接，最常常用的连接接方式是利利用连接字字符串进行行直接连接接。 1、建立连连接对象 在进行连接接之前，必必须要先声声明一个对对象来作为为ASP程程序和数据据库之间的的连接媒介介，声明的的方法如下下：Set对象象变量名称称=Serrver.CreaateObbjectt(“ADODDB.Coonnecctionn”)2、连接数数据源 Conneectioon对象中中有一个方方法：OPPEN，专专门用来打打开Connnecttion对对象与数据据库之间的的通道，实实现数据源源与ASPP程序的真

55、真正连通。（1）OPPEN方法法使用格式式如下：对对象变量.OPENN连接字符符串 其中，连接接字符串是是说明欲连连接数据库库的类型及及数据库的的名称。连连接字符串串有两种不不同格式的的描述方法法。（2）对于于ACCEESS类型型的数据库库的连接字字符串格式式 Drriverr=Miicrossoft Acceess DDriveer (*mdb); DDBQ=指指向.MDDB文件的的物理路径径; UIID=; PWD=密码（3）对于于SQL Servver类型型的数据库库的连接字字符串格式式 Drriverr=SQQL Seerverr; DDatabbase=数据库名名称; sservee

56、r=服务务器名称; UIDD=用户名名; PWWD=密码码3、关闭连连接 当不再需要要使用连接接对象时，需需要用CLLOSE方方法来关闭闭连接以释释放系统资资源。（1）关闭闭连接对象象的命令格格式为：连接对象变变量名.CClosee 或 Sett 连接对对象变量名名=Notthingg关闭对象并并非将它从从内存中删删除，以后后仍可以更更改它的属属性设置并并且再次打打开。（2）若要要将对象从从内存中完完全删除，可可将对象变变量设置为为Nothhing。4、执行SSQL查询询 通过Connnecttion对对象的Exxecutte方法执执行SQLL命令。根根据SQLL命令执行行后是否返返回记录集集

57、，Exeecutee方法的使使用格式可可分以下两两种方式。（1）执行行SQL命命令后，不不返回记录录集在执行像IInserrt、Deeletee、Upddate等等命令时，操操作结果不不会返回记记录集，它它只是对数数据库完成成一种操作作，可以使使用下列格格式的命令令：连接对对象名.EExecuute “SQL命命令” n ，N：是一个可可选项变量量名。用于于保存命令令执行后受受影响的记记录的条数数,如删除除的记录数数。 （2）执行行SQL查查询命令，返返回查询得得到的记录录集 用Execcute方方法对数据据表进行查查询得到的的结果通常常是一个二二维表形式式的数据集集合，为了了更好地应应用查询

58、结结果，经常常把查询结结果存储在在一个记录录集对象中中。格式如如下：Set 记录集对对象变量名名称=连接接对象变量量名.Exxecutte “SQL命命令” 例如：Seet Rss = CCn.Exxecutte “SELEECT * FFROM 注册用用户”查询表“注注册用户”中所有字字段所有记记录，以此此建立名为为 rs 的ReccordSSet对象象的实例。以后就可可以应用RRs对象的的各种方法法进行操作作，非常方方便。Recorrdsett对象 Recorrdsett对象是一一个记录的的集合，它它用于保存存通过查询询所获得的的记录结果果。ReccordSSet对象象包含多条条记录，每每

59、个记录包包含多个字字段，在任任何时刻，只只有一条记记录是当前前记录。通通过使用RRecorrdsett 对象可可以对记录录进行各种种操作，如如增删记录录、更新记记录、在表表中移动指指针等。1、创建RRecorrdsett 对象 第一种方法法前面介绍绍过的通过过连接对象象的Exeecutee()方法法返回的查查询结果自自动创建RRecorrdSett，这种方方法创建的的记录集对对象可以直直接使用，而而不用先创创建对象实实例。实现现的语法分分别如下：Set 对象变量量名 = 连接对象象变量名.Execcute(“SQL命命令”)如：Set RRS = Cn.EExecuute(“Seleect *

60、 Froom 注注册用户”) 执行查询询，产生记记录集另一种方法法是先用SSeverr对象的CCreatteObjject方方法创建记记录集对象象实例。Set 对象变量量名 = Servver.CCreatteObjject(“ADODDB.ReecorddSet”)2、利用RRecorrdSett对象的OOpen方方法读取数数据 RecorrdSett对象建立立完成后，其其中还没有有任何可供供使用的记记录数据，可可以通过RRecorrdSett对象中的的Openn方法获取取真正的记记录数据，OOpen方方法用来向向数据源提提出一个操操作请求并并执行具体体的操作。Openn方法的使使用格式如如