第9章界面设计试卷.ppt

* 记录1 记录2 记录3 …… 记录N 2．随机文件 随机文件（Random Access File）是可以按任意次序读写的文件，其中每个记录的长度必须相同。在这种文件结构中，每个记录都有其唯一的一个记录号，所以在读取数据时，只要知道记录号，便可以直接读取记录。 3．二进制文件 二进制文件（Binaryfile）是字节的集合、它直接把二进制码存放在文件中。 除了没有数据类型或者记录长度的含义以外，它与随机访问很相似，如果把二进制文件中的每一个字节看作是一条记录的话，则二进制模式就成了随机模式。 二进制访问模式是以字节数来定位数据，在程序中可以按任何方式组织和访问数据，对文件中各字节数据直接进行存取。任何文件都可以用二进制模式访问。 11．3 顺序文件的打开、读写 在VB中，对于顺序文件、随机文件、二进制文件的操作通常都有3个步骤： （1）打开文件 （2）访问文件 （3）关闭文件 11.3.1 顺序文件的打开与关闭 1．打开顺序文件 打开文件是任何类型文件进行读写的第一步。打开文件实质上就是将文件读入内存。 其使用格式如下： Open “文件名” For [模式] As [#]文件号 [Len = 记录长度] （1）文件名：是指要访问文件的路径及名称，如果文件处于当前驱动器的当前文件夹下，也可以只写文件名。 （2）模式：指定文件的打开方式。有Input,Append,Output,Random,Binary五种方式。 （3）文件号：是一个介于1~511之间的整数，文件名前面的“＃”号可有可无。打开文件时指定文件号，文件关闭后释放文件号。 2、关闭文件——Close 语句 对打开的文件进行各种操作后，必须将其关闭，否则将造成数据的丢失。 文件被关闭以后，它所占用的文件号会被释放，可供以后的Open语句使用。 使用格式如下： Close [#][文件号列表] 其中： 文件号：可选项，为文件号列表，如：#1, #2, #3，如果省略，则将关闭Open语句打开的所有活动文件。 例如：Close #1,#2,#3 关闭1号、2号、3号文件 Close 关闭所有打开的文件 10.3. 2 创建新的顺序文件 Open 文件名 [For Output ] As [#]文件号 write #文件号 [，数据列表] close #文件号 说明： for Output 打开方式。 如果该文件存在，则原来已有的数据被抹去，即新写上的数据将原有的数据覆盖。如果该文件不存在，则创建一个新的顺序文件。 write #文件号“数据列表”是准备写入到文件中的数据，可以是变量名也可以是常数，数据之间用“，”或“；”隔开。 Close #文件号 关闭已打开的文件。 例1：创建一个新的顺序文为c:\cj.txt Private?Sub?Command1_Click() Open?c:\cj.dat?For?Output?As?#1 Write?#1,?xh,?vb,?vc,?vfp Write?#1,?1,?80,?70,?90 Close?#1 End sub 10.3. 3 向顺序文件添加数据 Open 文件名 [For Append ] As [#]文件号 write #文件号 [，数据列表] close #文件号 说明： For Append对文件执行写操作时写入的数据将追加到文件尾部. 例如：将数据追加到c:\cj.txt文件的尾部。 Private?Sub?Command1_Click() Open?c:\cj.txt?For?Append?As?#1 Write?#1,?2,?60,?70,?80 Close?#1 End sub 10.3. 4 从已存在的顺序文件中读取数据 Open 文件名 [For Input] As [#]文件号 Input #文件号 [，变量名列表] close #文件号 说明： For Input以读取方式打开文件。 Input #文件号 ，该语句将从文件中读出数据，并将读出的数据分别赋给指定的变量。 例2：从文件c:\cj.txt中读出数据。 Private?Sub?Command1_Click() Open c:\cj.txt For Input As #1 For i = 1 To 3 Input #1, a, b, c Print a, b, c Next i Close #1 End Sub 例10-3 Print与Write语句输出数据结果比较。