Visual Basic程序设计第9章.pptVIP

Open d:\test.dat For Output As #1 Print # 1，Text1.text Close #1 2．Write语句 用Write语句项文件写入数据时，与Print语句不同的是，Write语句能自动在各数据项之间插入逗号，并给各字符串加上双引号。 Write语句的一般格式： Write #文件号 [，输出表列] 说明： 文件号和输出表列的意义与Print语句相同。 例如： Open d:\shua.dat For 　Output As #6 Write # 6， zhang ;wang; li Write # 6， 78 ;99; 67 Close #6 执行上面的程序段后，写入到文件中的数据如下： zhang ，wang， li 78，99，67 9.2. 3 顺序文件的读操作 顺序文件的读操作，就是从已存在的顺序文件中读取数据。在读一个顺序文件时，首先要用Input方式将准备读的文件打开。VB提供了Input、Line Input语句和Input函数将顺序文件的内容读入。Input函数将在9.5节中介绍。 1．Input语句 Input语句一般格式： Input #文件号 ，变量表列 说明： 变量用来存放从顺序文件中读出的数据。变量表列中的各项用逗号隔开，并且变量的个数和类型应该与从磁盘文件读取的记录中所存储的数据的状况一致。 如果顺序文件shua.dat的内容如下： zhang ，wang， li 78，99，67 执行Form_Click过程，在窗体上显示的内容为： zhang wang li 78 99 67 244 2．Line Input语句 Line Input语句是从打开的顺序文件中读取一行。 Line Input语句的一般格式： Line Input #文件号，字符串变量 说明： 其中的字符串变量用来接收从顺序文件中读出的一行数据。读出的数据不包括回车及换行符。例如：如果顺序文件shua.dat的内容如下： zhang ，wang， li 78，99，67 我们用Line Input语句将数据读出并且把它显示在文本框中。 Private Sub Command1_Click() Dim a$, b$ Open c:\_vb\shua.dat For Input As #2 Line Input #2, a Line Input #2, b Text1.Text = a b End Sub 执行以上过程，文本框中显示的内容为： zhang,wang,li78,99,67 9.3 随机文件 随机文件则可直接快速访问文件中的任意一条记录，它的缺点是占用空间较大。 随机文件由固定长度的记录组成，一条记录包含一个或多个字段。具有一个字段的记录对应于任一标准类型，比如整数或者定长字符串。具有多个字段的记录对应于用户定义类型。随机文件中每个记录都有一个记录号，只要指出记录号，就可以对该文件进行读写。 9.3.1 随机文件的打开与关闭 在对一个随机文件操作之前，也必须用Open语句打开文件，随机文件的打开方式必须是Random方式，同时要指明记录的长度。与顺序文件不同的是，随机文件打开后，可同时进行写入与读出操作。 Open语句的一般格式： Open 文件名 For Random As #文件号 Len=记录长度 说明： 记录长度是一条记录所占的字节数。可以用Len函数获得。 例如，定义以下记录： Type student Name As String*10 Age As Integer End Type 就可以用下面的语句打开： Open d:\Test.dat For Random As #9 Len=Len(student) 随机文件的关闭同顺序文件一样，用Close 语句。 9.3.2 随机文件的写操作 用Put语句进行随机文件的写操作。 P