广东工业大学实验报告
土木与交通工程 学院 测绘工程 专业 1201 班 成绩评定_______
学号 姓名 (合作者____学号____)
教师签名_______
预习情况 操作情况 考勤情况 数据处理情况 实验 1 题目 熟悉VB软件开发方法以及数据库访问
第2周 星期二第8，9节
一、 实验目的与要求
（一）实验目的
熟悉了VB开发的环境；了解和掌握利用VB读取给定格式的数据文件的方法以及利用动态数组对读入的数据进行储存和编辑；了解VB菜单的制作方法；熟悉VB中自定义数据类型的使用方法；熟悉VB总模块的建立方法，了解利用VB（程序建立或者控件连接）连接数据库的方法。 （二）实验要求
1) 读取水准高差数据，实验前编写出初步的源程序。
2) 水准高差观测数据文件格式为特定格式（见数据文件SZTJ.dat）。 3) 利用自定义类型的动态数组对读入的观测数据进行保存。 4) 利用数据控件，将已知数据和观测数据写入数据库中。
二、 实验方案
（一） 声明变量
声明包括动态数组、普通变量的声明，变量包含高差、高程、点号等变量。
（二） 读取数据
利用trim、instr、replace这三个函数共用后实现了将排版较乱的数据按一定的方式读取并显示在vb的窗口中。trim主要是清楚数据前后的空格，instr和replace则是将字符串中间的多余的空格删除。 代码如下
原数据如下
（三） 读取数据中的有用信息
2
主要应用split和val两个函数，split将数据从数列中一个个提取出来，另一个函数将字符串形式的数据转化为数值格式，并且将读取的有用的信息在vb窗口中显示出来，代码如下
（四） 关联access数据库并且写入数据库
将新创建的Adodc部件与数据库关联，并且将DataGrid显示框与Adodc相关联，将Adodc作为中间媒介，建立起数据库和vb之间的联系。 代码如下
3
三、 实验结果和数据处理
本程序实现了数据的读取、有用信息的提取、关联数据库等。运行程序之后，在vb窗口中显示如下
在access数据库中显示如下
4
四、 结论
通过本次实验，我学会了利用动态数组对读入的数据进行储存和编辑，熟悉了VB中自定义数据类型的使用方法，能够利用VB（程序建立或者控件连接）连接数据库。更深入地学会了vb一些深层次的功能，同时也更深刻地了解到编程对于本专业的重要性以及编程成功的方便性。
五、 问题与讨论
（1） 自定义变量类型有那些优点？
答：自定义变量的优点是能把一些在逻辑上有关联的东西组织在了一起，使得程序更具有可读性，并且较大程度得增强了这些有关联的东西之间的逻辑性，使运用起来更加方便。 （2） 动态数组有那些优点？
答：动态数据不需要事先定义数组的大小，在需要使用的时候才临时重新定义，这使得对于事先不知道大小的数组的使用带来了极大的方便，同时也可以节省一定的空间。
（3） 数据文件有几种类型？各种类型有哪些读写操作？ 答：1）顺序型：适用于读写在连续块中的文本文件
2) 随机性：适用于读写有固定长度记录结构的文本文件或者二进制文件 3) 二进制型：适用于读写任意有结构的文件 （4）在VB6.0中访问数据库有哪几种方式？ 答：1）ActiveX Data Object(ADO) 2）Remote Data Object(RDO)
3）Data Access Object(DAO)
5