荟聚奇文、博采众长、见贤思齐
当前位置:公文素材库 > 公文素材 > 范文素材 > 水利工程断面图的应用论文

水利工程断面图的应用论文

网站:公文素材库 | 时间:2019-05-11 15:05:58 | 移动端:水利工程断面图的应用论文

  VBA是建立在Office97中的宏语言,现在Autocad2000版内置了VBA开发工具。由于VBA具有VB的语言特点,语言结构简洁,适合工程技术人员开发。

  在河道整治、海塘建设、土地整理等大型项目的测量之后,都有一个十分繁琐的过程:画原始纵、横断面图。原始的方法是在测量过后,按照测量的数据,把原始纵横断面画在方格纸上,此种方法既慢,又不规范。现在随着计算机软件的发展,要求测量单位把原始纵横断面图用AUTOCAD表示出来。如果纵横断面图少的话,还可以,如果有大量的原始纵横断面图的话,在测量的同时,就需要有很多人来一笔一划的画。这种方法有很多缺点:

  1.需要浪费大量的人力资源,效率低下。

  2.容易出错,长时间的重复同一件事情(制图),很容易产生疲倦。

  3.出错后不易检查修改。整个原始纵横断面图画好之后,要检查每一个细节,费时费力。

  现在,经过我的努力,找到一种画原始纵横断面图的好方法。只要测量人员把测量的数据按照一定的格式输入到数据文件(如txt文本、Excel、数据库等),轻轻点击一下鼠标,整个工程的纵横断面图就画出来了。

  测量数据中有断面号、距离、高程等要素,用AUTOLISP和VBA都可以编程读数据、制图。但是,AUTOLISP的语言不如VBA的直观,运行效率也不如VBA的高;同时,AUTOLISP没有很简洁明了的界面,对有些不懂得计算机语言的人来说,在操作上有些困难。而VBA的界面完全可以达到智能化,即操作者只需简单的电脑知识即可完成其操作。

  整个制图过程分两步,分别为独立的模块。第一步:创建数据库。利用DAO创建一个数据库,内容包括:图号、中心点的坐标,各个测点的坐标。在创建数据库的时候,要首先知道整个工程一个断面的测点最多有多少。数据库的域只能多,不能少。因为数据库一行就存放一个断面的数据。如果数据库的域少了,则放不下。数据库的域多了没关系,多的部分可以补零。下面介绍一下创建数据库的思路与过程。

  使用者打开Autocad2000后,在“工具”菜单下“宏”选项下的“visualbasic编辑器”选项,打开此选项。在添加选项里添加一个新模块。程序的流程图如下:

  生成的数据文件可以用来存放一个工程的全部数据,也可以把整个工程的数据分成几大块,分别存放在不同的数据文件。数据库如图:

  桩号

  第一点距中

  心的距离

  坐标个数

  x坐标0

  y坐标0

  x坐标1

  y坐标1

  “第一点距中心的距离”是为了使画出的图形的中心对齐。坐标个数是输入数据的点的个数。后面的坐标从第一点开始,依次输入。默认值均为零。

  找到生成的数据文件,然后用Access打开,输入数据。也可以在Excel里,按照数据库同样的格式把数据输好了,再拷贝到Access数据库里。其中的数据文件用的是DAO数据格式。数据库的连接方式很多,有ODBC,DAO,ADO,OLEDB,RDO等数据库连接方式。DAO是建立在MicrosoftJet引擎上的。在VBA中,用户可通过DAO操作Access数据库,十分方便。并且这种数据库的稳定性很好,而其他的数据库格式在VBA中则没有DAO的数据库格式方便,可靠性也不如DAO,因为DAO在数据库的应用中已经大量应用,并且性能可靠。

  数据准备好之后,保存数据文件。

  第二步:读入数据及制图。

  画图的过程中,先是读入所有的数据,给各个变量赋值,然后再按照一定的先后顺序画。每个断面画好之后,变成一个模块,模块的插入点在断面图的左下角。等所有的图形都画好之后,再插入到图框中。图框的大小要先选好。在插入各个断面块体时,要控制插入点的位置,如图:1区为已经插入图形的区域,2、3区为下一幅图要放的区域,4为空白区域。先画好图框,然后x1=0;x2=图框长;y1=0;y2=图框高。

  插入第一个断面图,

  x1=图形长+a,y1=图形1高+a,

  x2=x2-a-x1,y2=y2-a-y1

  式中,a为图形与图形之间或图形与图框之间的距离,可以根据图框的大小调节。插入点在相对图框左上角点(a,-y1)处。插入第一个断面图之后,第二个断面图在插入时,有几种情况:

  (1)图形大小小于2号区域,即第二幅图形的长<x2并且高<y1,则插入,插入点在相对图框左上角点(x1+a,-y1)处。x1=x1+图形长+a,y1=y1,X2=x2-x1,y2=y2。

  (2)图形的高大于2号区域,即第二幅图形的长y1,则y1=图形2高+a,插入点在相对图框左上角点(x1+a,-y1)处。X1=x1+图形长+a,y1=图形2高+a,X2=x2-x1,y2=图框高-y1。

  (3)图形的长大于2号区域,即第二幅图形的长>x2,高<y2,则放在3号区域,

  x1=图形2长+a,y1=y1+图形2高+a

  插入点在相对图框左上角点(a,-y1)

  x2=图框长-max(图形1长+a,图形2长+a)-a

  y2=图框高-y1

  式中maxmax(图形1长+a,图形2长+a)为取两个值中的最大值。

  (4)图形太大,在2、3区域都放不下,则x1、x2、y1、y2恢复原值,另画一个图框,按照刚才的方法,依次插入图形。

  图形画好之后,保存图形,然后仔细查看,如果有问题,要核对数据文件里的数据。数据确定准确无误后,重新运行第二步,生成图形文件,保存时覆盖上一次的错误的文件。然后就可以出图。

  此种方法有以下优点:

  (1)整个过程简洁,不需要测量人员花大量的时间描绘图纸。不论工程的大小,测量数据的多少,一个人即可完成。节约了大量的宝贵的劳动力资源。并且工程量越大,效果越明显。

  (2)由于过程简单,不容易出错。

  (3)便于检查、修改。测量人员在往数据文件输入数据后,只要校核一下原始数据,即可确认画出的图形准确无误。

  (4)为以后的发展奠定基础。以后的测量,如果是用全测仪,测量数据可以保存在磁盘里,只要往计算机里拷贝一下,就可出图,工作效率极度提高。即便不用全测仪,也可用扫描仪把数据文件扫描下来,然后生成数据文件,免去了输入数据的麻烦。工作效率依然很高,并且不易出错。

来源:网络整理 免责声明:本文仅限学习分享,如产生版权问题,请联系我们及时删除。


水利工程断面图的应用论文》由互联网用户整理提供,转载分享请保留原作者信息,谢谢!
链接地址:http://www.bsmz.net/gongwen/132516.html
相关文章