实验十四 随机文件.docVIP

实验十四 随机文件 一、实验目的 1．掌握随机文件的打开、读、写和关闭操作。 2．掌握随机文件的使用。 二、实验内容 新建随机文件“D:\a.txt”。先往该随机文件中添加记录，然后浏览随机文件中的记录。 每个记录有两个字段（元素）：姓名、电话。 三、实验步骤与指导 1．设计界面 在窗体上添加三个标签、两个文本框、一个滚动条和四个命令按钮。初始界面如图14.1所示。 图14.1 初始界面 2．设置属性 表14.1 属性设置 对象 属性 属性值 Form1 Caption 随机文件 Label1 Caption 姓 名： Label2 Caption 电话号码： Text1 Text Text2 Text Command1 （名称） cmdAdd Caption 添加记录 Command2 （名称） cmdBrowse Caption 浏览记录 Command3 （名称） cmdClear Caption 清空文本框 Command4 （名称） cmdExit Caption 退出 Label3 Caption 请单击滚动条来选择记录: 设置属性后的界面如图14.2所示。 图14.2 设置属性后的界面 3．编写程序代码 Private Type Person name As String * 8 tel As String *