利用VB+MO开发管线信息系统的实践
VB编程技术在现代企业管理中的应用
VB编程技术在现代企业管理中的应用随着计算机网络的应用规模呈*式增长，网络设备、硬件平台、*作系统平台、应用软件等IT系统已变得越来越复杂和难以统一管理。
下面小编准备了一篇是恶化电大的毕业论文，主要是关于利用VB编程技术管理企业的论文，希望可以帮助到大家哦!摘要：本文对于技术做了简单的介绍;然后着重的对于VB编程技术在现代企业管理中的应用做了细致的分析，这部分主要从五个方面来介绍了一下，包括人力资源、产品加工、产品库存、生产计划以及产品调查。
关键词:编程技术;现代企业;管理;应用VB编程技术就是当今非常受大家推崇的一种新型的编程技术，VB 编程技术对于企业管理方面有很大的帮助，下面我们就来一起探讨一下VB编程技术在现代企业管理中的应用。
1、VB编程技术的简介1)VB编程技术的概念。
VB是VisualBasic的缩写，是由微软公司开发的一种可视化的程序设计语言。
目前，VB是在世界上被人们使用最多的一种语言。
VB 拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件。
VB是由传统即基础语言而衍生出来的新的语言，VB语言照比传统语言更加的方便和快捷。
2)VB编程技术的发展史。
VB编程技术是由微软公司在1991年推出的，VB编程技术的最初的设计者是阿兰·库珀。
VB编程的推出在当时的社会中引起了很大的轰动，人们认为这种可视*的编程语言对于软件的开发历史来讲具有跨时代*的作用。
VB编程技术开创了一个新的纪元。
在接下来的四年里，VB2.0、VB3.0、VB4.0三个版本应运而生从VB3.0开始，微软将Access的数据库驱动集成到了VB;从VB4.0开始，VB也引入了面向对象的程序设计思想。
2002年，微软公司将Framework与VisualBasic结合而成为VisualBasic。
在之后，基本上VB编程技术每年都会进行版本的更新，每次都会加入更加强大和多样化的技术。
管道三维数字信息系统建设的探索和实践
管道三维数字信息系统建设的探索和实践1 项目背景随着信息化管道规模的不断扩大，手工的管理模式和管理手段已无法满足成品油管道“合理规划、科学管理、优质服务”的要求。
对于突发事故的应变能力和处理效率难以适应企业集团高速发展的需求。
浙江诸暨——桐庐成品油管道建设和运行管理单位需要一种更为方便、及时的方式，来管理地下资源——地下管道，要求科学管理管道资源及相关的管道信息，实现整个管道线路的安全和可控。
1.1 浙江诸暨——桐庐成品油管道发展现状由于浙江诸暨——桐庐成品油管道工程埋设方式不同，施工时间也有先后，形成的管线纵横交错，在建设中与原有的其他单位地上和地下的矛盾越来越突出，施工中一不小心就会出现挖断和损坏原有的地下管线，造成地下通讯中断、燃气泄漏、供水、供电停止、污水乱流等常有的事故，给人民生活和国家财产造成威胁和损失。
这种情况主要是由于缺乏直观的地下管道线路资料和三维仿真管道系统的分析，对建设项目监管失效，从而导致建设单位盲目施工造成以上种种情况。
1.2 目前管道存在的主要问题管道档案管理分散、档案材料收集困难，基本上处于传统的纸质的文档及文件，管理分散，使资源无法共享，缺乏科学管理和有效监管。
在建设中，长期以来受历史和现实等多种因素的影响，存在重地上、轻地下、重审批、轻监管、重建设、轻养护的问题，实施过程中临时变更设计，新老管线叠加，潜在诸多安全事故隐患。
1.3 数字管道线路建设需要此次浙江诸暨——桐庐成品油管道工程将着重以建立管线数字化管理系统为目标，以地理信息平台为基础，通过各管线所属企业提供的资料，结合探测普查进行核对的方式，建立“三维数字管线信息系统”。
采用物理探测、现代测绘、计算机与网络技术以及地理信息系统技术，建立信息管理系统。
2 项目分析2.1 项目定位目前，大多数的管线所属单位通过二维地下空间信息系统进行地下空间数据的管理、分析。
但随着地下空间应用的不断深入，二维地下空间系统无法表达三维实体的空间形态与实体间的三维空间拓扑关系，难以取得令人满意的效果，因而，二维系统的地下空间应用的不足日益突显。
基于MO和VB的河南航道基础地理信息系统研制
Ｍｉ ｏｏ Ｖ ｓａ Ｂ ｓ ａｄ ｃ ｓｆ ｉ ｌ ａｉ ｎ Ｍａ Ｏ ｊｃｓ ｈ ｅ ｈ ｏｏｙ ｔａ ｎ ｕ ｆ ｇｏｒｐ ｉ ａａ ｓ ｂｉ ｍ ｎ ｆ ｒ ｔ ｕ ｃ ｐ ｂｅｔ ．Ｔ ｅ ｔｃ ｎｌｇ ｈ ｔ ｐ ｔ ｏ ｅｇａ ｈｃ ｔ，ｅｔ ｌｈ ｅ ｔ ｉ ｄ ａ ｓ ｏ
ｄ ｔ ｂ ｓ ｎ ｒ ａ ｉｅ ｍｅｈｏ ｏ ｅｅ ｔｏ ｉ ｍａ ｅ ｃ ａ ｂ ｕ ｅ ｆｒ ｒ ｆ ｒ ｎ ｅ ａａ ａ ｅ ａ ｄ ｅ ｌ ｄ ｚ ｔ ｄ ｆ ｌ ｃｒ ｎ ｃ ｐ ｔ ．ｃ ｎ ｅ ｓ ｄ ｏ ｅｅ ｅ ｃ ．
Ｋｅ ｏ ｄ ：Ｍａ Ｏ ｊｃｓ ａ ｒｗ ｙ ｅｇａ ｈｃ ｉｆ ｍ ｔ ｎ ｓｓ ｍ ｙ ｗ ｒｓ ｐ ｂｅｔ；ｗ ｔ ａ ；ｇｏ ｒｐ ｉ ｎｏ ａｉ ｙ ｔ ｅ ｒ ｏ ｅ １ 引言 Ｇ Ｓ Ｇ ｏ ｒ ｈｃＩｆｒ ｔ ｎＳ ｓ ｍ） Ｉ （ ｅｇａ ｉ ｎｏｍａ ｏ ｙｔ 是一 个 有 组 ｐ ｉ ｅ
取 、存 贮 、显示 、分析 、处 理各种 与地理 或空 间相
关 的数 据 ，能将 图形与数 据有 机地结 合起来 充分 地
表 达数 据的地 理 图形信息 。 内河 运输 业是 我 国交 通
●０ ●０ ●＜＞ ● ＜＞ ●＜ ＞ ● ＞ ●＜ ＞ ●＜＞ ●０ ＜ ●０ ●０ ●◇ ● ＜＞ ●＜ ＞ ●０ ●０ ●＜ ＞ ●０ ●＜ ＞ ●＜＞ ● ＜＞ ●＜＞ ●
ａ 对于 在设计 勘测 中发 现地 质情况 较 复杂 的 隧 ）
对 于复杂 地质 ，应尽 可能地 在 隧道开 挖面沿 隧道方
向每２ ｍ采 用一 次高 密度 电法 勘测 ，这样 可 以更 准 ０
确 地 了解 隧道 的地 质情况 。
参 考 文 献
用VB开发管理信息系统2011
用VB开发管理信息系统一、界面、对象与事件驱动程序界面设计是计算机应用程序设计的一部分重要工作。
人-机界面是人与计算机之间传递、交换信息的媒介，是用户使用计算机的综合操作环境。
“对象”是系统中的基本运行实体，它封装了数据和操作。
对象的性质和状态特征称为“属性”，同类型的对象具有相同的属性。
同类对象的抽象成为“类”。
对对象的操作称为“方法”。
对象不会无缘无故地执行某个操作，只有在接受别的对象请求时，才会进行某一操作。
这种请求对象执行某一操作或回答某些信息的要求成为“事件”或“消息”。
对象接到消息（或发生某事件）所执行的程序称为事件驱动程序。
VB中的事件驱动程序表示为“过程”程序员在VB平台上开发一个应用程序（工程），要完成的工作就是：◆需求分析。
对要解决的问题进行数据描述和功能描述◆界面设计。
根据应用程序的功能和用户的特点，设计界面。
包括建立窗体、在窗体上建立各种图形对象并设定他们的属性值。
◆设计事件驱动程序。
为各对象编写某事件发生时执行的程序代码。
测试。
一个应用程序往往要经过反复的调试、修改才能交付使用。
第二部分从本次课开始介绍一个小型系统—学生管理信息系统部分功能的开发。
一、建立数据库VB中可以使用自带的数据库管理器VisData创建或查看数据库。
（1）单击“外接程序”菜单的“可视化数据管理器”命令，显示VisData窗口（2）选择“文件”菜单中的“新建”命令，可以选用几种不同的格式设计数据库。
单击“MicrosoftAccess”的“Version 7.0 mdb （7）”，创建一个Access数据库。
（3）系统会弹出一个对话框，选择要创建的数据库，或设置数据库的位置和名称后，单击“保存”按钮。
（4）向数据库中添加表，右键单击可视化数据管理器的“数据库窗口”中的“属性”选项并选择“新建表”命令。
（5）在弹出的“表结构”对话框中的“表名称”栏输入表的名称。
（6）单击“添加字段”按钮，在“名称”栏输入字段名称，设置它的类型和大小，单击“确定”按钮，将该字段的设置添加到表中。
石大《GIS设计与开发》实习指导03 VB环境下的MO和系统界面设计
第三章VB环境下的MO和系统界面设计一、实验目的1.了解组件GIS开发环境的构建，相关软件的安装。
2. 利用VB进行“石河子****信息系统”欢迎界面和操作界面的设计。
二、实验准备完成时间：6学时预备知识：实验的操作系统环境为Windows 2000/XP，要基于MapObjects 进行应用开发，系统中需要安装有：Visual Basic 6.0 及补丁Service Pack 6; GIS 组件――MapObjects 2.x;实验数据：在文件夹data中三、实验步骤及方法1. VB环境下运行MO（1）装入MapObjects 控件①安装MapObjects 2.2及Visual Basic 6.0；②运行Visual Basic，从对话框中选择NewStandardEXE，创建一个新的应用程序。
右击工具箱，然后选择弹出菜单中的“部件”（或Ctrl+T组合键），打开对话框图3.1 部件对话框（图3.1），从控件列表中找到并勾选MapObjects 2.x，此时工具箱出现新的控件（图3.2）；MapObjects地图控件图3.2 显示在工具箱中的MapObjects地图控件③添加地图控件（也可双击添加），在地图控件上点右键，选择弹出菜单“特性”—Add，添加数据—“green.Shp”（图3.3），并可设置图层的属性（图3.4）。
如果操作正确，运行程序后，此图层应该能够显示在窗体的Map控件上。
图3.3 属性页对话框图3.4 图层属性对话框2.“石河子****信息系统” 欢迎界面的设计（1）包括系统名称、开发者、进入、退出按键和欢迎示意（图3.5）；（2）用户名和密码设置（图3.6）；（3）简洁美观、操作简单；图3.5 欢迎界面图3.6 用户名、密码设置及欢迎示意3.操作界面的设计和布局：简洁美观、操作简单(1)界面布局：包括系统名称、菜单栏、工具栏、地图显示区域、缩略图区域、图层显示区域和可查数据显示区域，其中地图显示区域占较大显示空间（图3.7）；图3.7 系统操作界面（2）菜单栏设计：【工具】-【菜单编辑器】，设计菜单栏的主菜单及下拉菜单（图3.8）图3.8 菜单编辑器（3）弹出式菜单设计：PopupMenu语法：object.PopupMenu menuname，flags，x，y，boldcommand描述：object，可选。
VB开发学生信息管理系统的设计与实现
学生信息管理系统的设计与实现一、设计目的管理信息系统（MIS，Management Information System）是进行信息的采集、存储、加工、维护和使用的系统，在现代信息社会中，它的应用越来越普及。
学生信息管理系统是MIS的一个简化的应用实例。
本课程设计的目的是通过创建学生信息管理系统，使读者熟练掌握：（1）利用所学知识进行数据库的设计与开发；（2）利用前端开发工具VB和ADO等相关技术编制数据访问应用程序的基本过程和方法；（3）管理信息系统的简单开发步骤。
二、功能介绍MIS的实现离不开数据库，VB可以访问任何主流数据库。
ADO是目前应用范围最广的数据访问接口，在VB中可以非常方便地使用ADO数据控件和ADO编程模型访问各种类型的数据库。
本课程设计采用VB+ADO+SQL SERVER 2005，创建一个简单的学生信息管理系统，系统的主要功能如下：∙学籍管理：包括基本学籍信息的输入、修改和查询。
∙课程管理：包括课程信息的输入和修改。
∙成绩管理：包括成绩信息的输入、修改和查询。
∙用户管理：包括添加用户、删除用户、修改密码。
系统功能模块如图所示。
三、数据库设计具体要求创建一个学生信息管理系统，可以完成学生基本信息及成绩的输入、修改和查询。
具体要求如下：1. 建立数据库利用SQL SERVER 2005建立数据库，名称为“Student.mdf”。
2. 建立数据表在Student.mdf数据库中建立5个表：（1）学籍表该表存放学生的基本信息，名称为“ST”，结构如表1所示。
表1 学籍表结构说明：表中暂时存放20条记录，各字段均不应为空。
（2）成绩表该表存放学生成绩，名称为“CJ”，结构如表2所示。
表2 成绩表结构说明：●学号和课号组合起来为成绩表主键●表中暂时存放20条记录（3）课程信息表该表存放课程信息，名称为“KC”，结构如表3所示。
表3 课程信息表结构说明：表中暂时存放10条记录，各字段均不应为空。
VB学生信息管理系统实验报告
一、开发简介本系统主要包括信息录入、信息查询、关闭系统三部分。
其功能主要有：⒈有关学生信息的录入，包括录入学生基本信息、学生考试成绩等。
2.学生信息的查询，包括查询学生的个人基本信息、科目考试成绩。
二、开发流程学生信息管理系统由用户登陆、学生信息管理系统菜单、学生信息录入、查询、学生基本信息修改和删除这几个功能模块组成，其结构如图：三、需求分析1、本系统主要实现对学生的基本信息管理、考试成绩管理功能。
(1)学生信息管理：管理员管理学生的信息并同时提供学生的信息。
学生的基本信息包括：学号、姓名、性别、、院系、班级、专业、成绩。
(2)需求实现的功能：学生基本信息和考试成绩维护、录入学生基本信息和考试成绩、查询统计考生基本信息和考试成绩。
2、其他需求：为体现数据库相关概念，在系统实现中要尽量创建数据库、创建表、维护表、以及安全管理的等功能。
四、数据库结构设计设立两个数据库，分别为：密码表学生信息表五、软件设计1、解决方案和软件特色(1)本系统具有很强的可靠性，可以对录入的学生信息进行效验，对数据进行修改、删除，可以方便管理员的修改与维护。
(2)本系统操作方便、灵活、简单。
操作人员只需录入学生的基本信息和考试成绩的数据。
(3)本系统可高效、快速的查询到学生的基本信息和考试成绩，便于管理员管理工作的开展。
(4)本系统主要用于学校学生信息管理，总体任务是实现学生信息关系的系统化、规范化和自动化，其主要任务是用计算机对学生各种信息进行日常管理，如查询、修改、添加，另外还考虑到学生考试成绩，针对这些要求设计了学生信息管理系统。
2、具体设计登录界面及程序代码如下：Private Sub Command1_Click()Adodc1.RecordSource = "密码表"Adodc1.RefreshAdodc1.Recordset.Find "学号='" & Text1.Text & "'" If Adodc1.Recordset.EOF ThenMsgBox "用户名不存在", , "警告"Text1.Text = ""Text2.Text = ""ElseIf Adodc1.Recordset.Fields("密码") Then Form1.HideForm2.ShowElseMsgBox "密码错误", , "警告"Text2.Text = ""End IfEnd SubPrivate Sub Command2_Click()Text1.Text = ""Text2.Text = ""End SubPrivate Sub Command3_Click()EndEnd Sub主界面窗体及代码如下：Private Sub 个人信息查询_Click() Form2.HideForm4.ShowEnd SubPrivate Sub 个人信息录入_Click() Form2.HideForm3.ShowEnd SubPrivate Sub 关闭系统_Click() EndEnd Sub个人信息录入界面及代码如下：Private Sub Command1_Click(Index As Integer) Select Case IndexCase 0Adodc1.Recordset.MoveFirstCase 1Adodc1.Recordset.MovePreviousIf Adodc1.Recordset.BOF ThenAdodc1.Recordset.MoveFirstEnd IfCase 2Adodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF ThenAdodc1.Recordset.MoveLastEnd IfCase 3Adodc1.Recordset.MoveLastCase 4Adodc1.Recordset.AddNewCase 5Adodc1.Recordset.Update End SelectEnd SubPrivate Sub Command2_Click()Form3.HideForm2.ShowEnd Sub个人信息查询界面及代码如下：Private Sub Command1_Click()ch$ = InputBox("请输入要查询的学号", "输入框") Adodc1.Recordset.Find "学号Like '" & ch & "*" & "'", , , 1 End SubPrivate Sub Command2_Click()ch$ = InputBox("请输入要查询的姓名", "输入框") Adodc1.Recordset.Find "姓名Like '" & ch & "*" & "'", , , 1 End SubPrivate Sub Command3_Click()Form4.HideForm2.ShowEnd Sub六、经验总结通过本实验的学生信息系统的设计，我对VB有了更深刻的了解和认识，比以前强了许多，进一步了解对VB设计的方法和一些小技巧，还有数据库的连接与实现，帮助等工具的操作与实现，都比以前更熟练了，理论与实践结合在一起，学到了许多新的东西。
利用VB数据库编程实现地下管线数据管理
第７ 第６ 卷 期 ２ ０ 年 ６月 ０８
软 件 导 刊
Ｓｏｔ ｒ ｉｅ ｆｗａｅ Ｇｕｄ
ＶＯ ． Ｏ６ １７Ｎ ．
Ｊｎ ２ ８ ｕ ． ｏｏ
型 ， 意味 着它包 含较 少 的对象 、 多的属 性、 这 更 方法 （ 和参数 ） 以
及 事件 。 （ ） Ａ Ｄ ｔ ｃｅｓＯ ｊｃｓ ： 据访 问对象 ， 是一种 面 ３ Ｄ Ｏ（ ａ Ａ ｃ ｓ ｂｅｔ）数 ａ 它 向对 象 的界 面接 口。通过 Ｄ ＯＪｔ Ａ ／ 功能 可 以访 问ＩＡＭ数 据 库 ， ｅ Ｓ 使 用Ｄ ，Ｄ Ｃ Ｄｒｃ功能 可 以实现 远程Ｒ Ｏ功能 。 Ａ０Ｏ Ｂ ｉ ｔ ｅ Ｄ
连接技 术 ， 为异 种数据 库 的访 问提供 了统一 的接 口。
（ ） Ｄ Ｃ Ａ Ｉ数据 库 厂商 为程 序设 计者 提供 的直 接访 问 ６Ｏ Ｂ Ｐ ： 数据库 的一组 函数 。
（ ） Ｄ Ａ ｔ ｅＤａ ｂｅｔ）Ａ ｔ ｅ 据 对 象 ， 是 Ｄ Ｏ ２ Ａ Ｏ（ ｃｉ ｔ Ｏ ｊｃｓ ： ｃｉ 数 ｖ ａ ｖ 它 Ａ／
Ｒ ＤＯ的后 继产 物 。Ａ ＤＯ“ 展 ” Ａ 扩 了Ｄ Ｏ和Ｒ 所 使用 的对 象 模 ＤＯ
２ 接 口特 点 说 明
用Ｖ 开 发 基 于Ｓ ＬＳ ｒｅ的数 据 库 系统 ．以上 几பைடு நூலகம்种 访 问 Ｂ Ｑ ｅｖ ｒ
（ ）Ｅ Ｊｉｔ ｎｉｅＴ ｃ ｎ ｌｇ ） 数 据 连 接 性 引 擎 技 术 ， ４ Ｊ Ｔ（ｏｎ ｇｎ ｅ ｈ ｏｏｙ ： Ｅ
Ｓ ＬＳｒ ｒ Ｑ ｅ ｅ的方 法各 有各 的特点 。 Ａ 方法是 基于对 象 的 。 而 ｖ ＤＯ 因
城市地下三维管线信息系统思考和实践
城市地下三维管线信息系统思考和实践城市地下三维管线信息系统是指一种可视化的信息系统，其主要目的是描述和管理城市地下的三维管线信息。
对于城市来说，地下管线系统是城市的血脉，如电力、能源、水利、通信等管线被广泛铺设于地下，是城市能够正常运行的基础设施。
但是在日常的城市管理中，由于缺少直观、准确、及时的三维管线信息，管线维护难度大、效率低。
因此，研发一套完善的城市地下三维管线信息系统成为建设智慧城市的重要措施之一。
城市地下三维管线信息系统的核心是建立城市地下管线的数字模型，并建立与之相关的各种数据属性和信息标识。
在此基础上，系统应该具有如下特点：一、可视化：系统应该实现对管线的三维可视化和交互操作，用户可以通过键盘和鼠标控制系统，旋转、缩放、平移、截面等操作方式查看各种管线信息。
二、高精度：系统应该以高精度数字模型为基础，确保管线信息的精确度和实时性。
需要解决管线地理空间位置精度、管线直径、管线长度、管线材质、管线接口等多个参数的精度问题。
三、信息化：系统应该建立一套信息化管理平台，对城市管线信息进行维护、更新、查询、分析和决策。
可通过互联网、手机端、大屏展示等方式实现用户对城市管线信息的查询和监控。
四、安全性：系统应该建立安全门限，对于普通用户和系统管理员掌握的管线信息进行差别化和保护，并完善对地下管线信息的权限控制机制。
五、可扩展性：随着城市发展和信息化进程的加快，城市地下管线系统还应该具备较强的可扩展性和可升级性，应该通过技术手段如机器学习、人工智能等不断提升系统的管理水平和工作效率。
在实践中，建立城市地下三维管线信息系统需要从以下几个方面入手：一、数据采集：建立城市地下三维管线信息系统需要收集地下管线的各类信息。
一方面可以通过市政工程档案、设备资料等方式收集已有信息，并且要求业主、承包商等提供有关管线的详细信息；另一方面，也可以使用无人机、激光扫描等技术手段对管线进行实时地面巡查和建模，然后将获取的数据存储到三维模型中。
BIM技术在管网施工中的应用
BIM技术在管网施工中的应用摘要：城市的发展日新月异，城市化建设的程度也越来越高，地下综合管理在复杂程度以及难度上变得越来越大。
所以，需要通过重视对地下施工的管网，做到提供可视化的标准，从而以城市居民生活的基础设施作为管控的重点，使得信息的传递和物质的调配能够更加充分。
通过基于城市发展的“生命线”，掌握城市发展的目标，从而在实际施工当中，注意对地下管网问题的分析，维持管网系统的稳定性。
本文通过考虑运用BIM技术来解决实际问题，在漫游、模型参看等等过程当中，掌握内部属性信息。
借助BIM技术的帮助，推动管网施工的发展。
关键词：BIM技术；管网施工；应用一、BIM技术概述随着计算机和信息化技术的发展，BIM技术运营而生，在借助BIM技术在建筑当中进行管网的综合建设，能够提高整体工作的效率。
从地下管网的规划设计到施工运作，都能够借助BIM技术实现精细化的管理过程，以提高工程整体的管控质量。
BIM技术在表达方式上属于一种数字化的模式，它通过展现出建筑工程的几何属性，结合知识资源，做好项目全方位的共享工作。
在操作的过程当中，基于大量零碎的图纸，展开综合性的研究，从而以虚拟的形式，鉴别施工单位在开展建设当中的几何学冲突，从而在实际管控中解决相关问题。
BIM技术从2004年以来引入我国的建筑行业中，从而不断的加深应用的范围以及研究的力度，广泛使用在地下工程的勘探、施工建设的研究、设计的管控、资源的共享等多个阶段。
但是由于各方的局限性，BIM技术仍旧处于初级探索阶段，在工程勘探等领域的研究仍旧拥有许多的难点。
二、管网现状及存在的问题现阶段相关建筑工程在开展施工建设的过程当中，往往通过使用二维信息图纸来对地下管网的资料进行核对。
但是这些图纸的信息利用二维形式展现时，无论是地理的符号变化，还是相关附加信息，都难以得到全面的表达。
传统图纸的不精确性，导致在开展地下管网建设时，容易存在许多信息交流和工作支配的错误，各个专业的交叉也使得施工的定位准确度不够。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
利用VB＋MO开发管线信息系统的实践
宋全红
辽宁工程技术大学测绘与地理科学学院，辽宁阜新（123000）
E-mail：2894053@
摘要：本文介绍了利用MapObject开发地理信息系统（GIS）的优势，探讨了利用VB＋MO开发管线信息系统的方法，并在此基础上实现了一个简单的管线信息显示和查询系统。
关键词：GIS，MapObject，管线信息系统
中图分类号：TP31
1.引言
现代化大城市的管理需要掌握大量最新的可靠数据（包括地面的和地下的、地理的和非地理的数据）。
要求能在任何时间查询这些数据，能够进行综合分析以便为估价城市的发展、规划策略、城市管理和建设设计提供可靠的数据。
面对大量的浩繁数据需要采用现代计算机科学与技术建立一个城市信息系统。
现代的GIS技术非常适宜于解决这个问题。
本文在这种背景下，结合工作实践，探讨了利用VB＋MO开发一个简单的管线信息系统的技术步骤，并以胶州市的管线数据为实验数据，实现了管线信息的显示和查询，为进一步的操作和分析作了铺垫。
2.MapObject及其特色
2.1 MapObject简介
MapObject是美国ESRI公司为开发人员提供的一套图形和GIS组件，它不是一个最终的软件，用户可用它来开发图形应用系统，也可以在其它的管理系统中加入图形功能。
MapObject建立在微软的OLE技术基础[1]
上，它包括一个制图与GIS的OLE控件，以及超过35个的OLE可编程对象。
用户可使用VB、VC、Delphi以及ACCESS等平台进行二次开发。
2.2 MapObject的功能
（1）直接使用ARC/INFO的图层（coverage）、数据库引擎（sde）以及图形文件（shapefile）、图像文件（tif等）；
（2）支持外部数据库；
（3）可显示多层图形、可漫游、放大、缩小；
（4）可按图形属性值或种类绘分色图、点密度图或符号化表示；
（5）注记标识和位置；
（6）用事件跟踪层显示实时动态数据（如GPS跟踪）；
（7）按属性查询检索；
（8）通过多种搜索和控件操作做空间查询；
（9）地址匹配等。
2.3 MapObject的开发应用
使用P4微机＋WIN2000＋VB6.0＋MapObject2.3做客户器，用VB编写应用系统界面，
并实现图形设计、编辑、存储等功能，能满足规划设计需要。
2.4 MapObject的性价比
如前所述，MapObject的功能能够满足一般小规模系统的需要，而且MapObject是一种供开发者使用的中间工具，只要有一套MapObject，就可以在不同的机器上任意安装，而且生成的可执行文件也可任意安装。
3.数据描述与分析
胶州市管线数据是以Access数据库形式给出，共有合成电力、合电信、合联通、合污水、合雨水、天然气、有线电视、中国移动八个mdb文件构成。
每个数据库文件中有两个数据裱，一个用来描述管线点属性，称为点表，其主要字段有本点号、横坐标、纵坐标、地面高、埋深、修建年代、附属设施、规格、道路名、产权单位、备注；另一个数据表用来描述管线的线信息，称为线表，其主要字段有本点号、上点号、埋深、管线类型、材质、规格、管径、道路名、产权单位、备注[2]。
经过分析，可以看出，点表中的“本点号”是用来唯一标志该点的属性信息，而“横坐标”、“纵坐标”是用来标志该点的地理信息（位置信息），而其它字段是用来描述该点属性的属性信息；线表中的“本点号”和“上点号”是用来标识该段管线的起点和终点（起点和终点的具体信息可通过检索点表获得），其它字段是用来描述该段管线属性的属性信息。
4.VB+MO开发管线信息系统关键技术
4.1 数据显示和属性关联
为了实现管线数据库中点信息的显示，必须遍历点表中的每条记录（利用VB，DAO 技术可实现数据表的遍历），求出该点表中横坐标的最大值、最小值和纵坐标的最大值、最小值，并将当前Map控件的FullExtent属性赋值为以这四个坐标定义的Rect对象，就可以实现数据的全图显示。
为了实现管线数据库中线信息的显示，首先要读出线表中该线段的“本点号”和“上点号”中点的标志号，然后根据“本点号”和“上点号”的内容遍历点表，找到“本点号”和“上点号”对应的横、纵坐标，从而就确定了该线的位置[3]。
在MO中，可以将点表中的点存贮在points中，再逐个显示；将线表的起点和中点存储在line对象的parts属性中，其中parts的每个元素就是point。
此时，管线数据库中的点和线就显示在了map控件中，为了给这些点、线附加属性，就需要建立TableDisc对象。
在建立了TableDisc对象后，也就建立了shp文件，此时的点、线才算是真正意义上的管线[4]。
建立的shp文件可以在ArcMap中直接打开进行编辑和操作。
4.2 点击查询和属性查询
用户可以通过两种方式进行查询操作。
当用户在map控件上进行点击时，可以通过MO 的SearchByDistance方法获得用户想要查询的点、线，然后通过对相应的数据表进行遍历，就可以把该点或线的属性显示出来。
当用属性进行查询时，需要用户输入查询关键字，然后根据查询关键字遍历数据表，寻找属性匹配的记录加以显示。
4.3 图层操作
系统必须实现简单的图层（shp图层或栅格图像层）加入、移除等操作，同时，还需要将当前map控件中的图层显示出来，这在MO中是通过将map控件和Legend控件进行关联来实现的。
5.系统实现
在以上思路下，用VB＋MO的方法开发了一个简单的管线信息显示和查询系统，它能实现将以Access数据存储的管线数据进行显示和查询操作，并且实现了将管线数据转化为shp文件，从而为后续的分析和操作提供了铺垫。
图1为系统运行界面：
图1 系统界面
Fig.1 system interface
6.总结与展望
本文介绍了用MapObject进行管线信息系统开发的优势，探讨了用VB＋MO开发管线信息系统的方法，并以此为基础，进行了编程实践，得到了一个简单的具有管线信息显示和查询功能的系统。
进一步的研究方向就是管线的三维剖面显示以及地理信息系统中一些常用的分析功能的实现方法。
参考文献
[1] 龙家恒．用MapObject作《北京城市基础地理信息系统》前端软件的探讨[J]．北京测绘．1998年第1
期．
[2] 何塞峰，姚革，龙家恒．综合地下管网信息子系统的设计研究[A]．GIS应用论文集．
[3] 张霞，基于DAO技术的地理信息系统属性数据管理[J]，测绘通报，2002年第3期．
[4] 张保钢，顾学明，姚革，崔学民．北京市地下管网图形数据库系统的特点与研制方法[A]．GIS应用论
文集．
The Practice of developing pipeline information system with
VB and MO
Song Quanhong
The Department of Survey and Geography Technology, Liaoning Techinical University, fuxin,
Liaoning (123000)
Abstract
This paper introduces the disadvantages of developing Geographic Information System (GIS) using MapObject and discusses the way to develop a pipeline information system with VB and MO. based on this, a simple system which can display and inquiry pipeline information is developed.
Keywords：GIS，MapObject，pipeline information system。