21章学会VB——第十章文件系统.pptVIP

第十讲 文 件 系 统 文件的结构和类型 文件基本操作 使用文件系统控件 深入文件系统 综合练习 思考和习题 课程内容安排 应用程序对文件进行读写操作时，必须按照数据的存放方式进行。数据的存放方式就是文件的结构。在Visual Basic 6.0中，文件的结构可以用记录集来描述。记录是由字段组成，而字段是由字符组成的。文件结构示意图如图10.2所示。 文件的结构 在Visual Basic 6.0中提供了三种数据的访问方式，顺序访问、随机访问和二进制访问。根据这三种访问方式将文件分为顺序文件、随机文件和二进制文件三种。下面分别对这三种文件类型予以介绍。 顺序文件是为普通的文本文件的使用设计的。数据被存储为ANSI字符。顺序文件具有简单的文本结构，将要存放的数据依次转换为ASCII码，然后存入磁盘。顺序文件的存储格式如图10.3所示。 文件的类型 随机文件由相同格式的记录组成。随机文件的结构与数据库文件的结构最为相似。该文件中，数据按照记录的方式存放，每个存放单元以记录号标识，如图10.4所示。相对于顺序文件结构，随机文件结构更利于数据的读取、查找、删除、插入等相关操作。例如，要想对某一记录进行删除，只需按照记录的记录号找到记录即可进行删除操作。 二进制文件适用于读写任意有结构的文件。该文件允许存储所有读者希望的数据格式。除了没有数据类型或者记录长度的要求以外，它与随机访问很相似。但是，为了能够正确地对它检索必须精确地知道数据是如何写到文件中的。 在对文件操作的时候读者应该首先打开文件，在完成文件操作后应该将文件关闭。以下介绍顺序文件的打开和关闭。 1．顺序文件的打开 顺序文件的打开需要使用Open语句。Open语句的语法如下。 Open pathname For [Input|Output|Append] As filenumber [Len=buffersize] 以下代码演示了使用Open语句打开一个位于“C：\test.txt”的文件，该文件用于存储数据。 01 ‘Open语句使用演示 02 Private Sub Command1_Click() 03 Open C:\test.txt For Output As #1 打开“C：\test.txt”文件 04 End Sub 顺序文件的打开和关闭 打开一个顺序文件并完成相应的操作后应该及时地关闭该文件。这样可以释系统资源并且可以使其他程序能够使用这个文件。关闭文件需要使用Close语句，该语句的语法如下所示。 Close [filenamelist] 以下代码使用Close语句关闭一个打开的文件。 01 使用Close语句 02 Private Sub Command1_Click() 03 Open C:\test.txt For Output As #1 打开文件 04 Close #1 关闭文件 05 End Sub 为了方便介绍顺序文件的读写操作，首先介绍顺序文件的写操作。在Visual Basic 6.0中顺序文件的写操作主要是使用Print#语句和Write#语句。 如果要读入数据，应该首先用Input方式打开顺序文件，然后读出数据。顺序文件的读操作可以使用Input#语句、Line Input#语句或Input函数。 顺序文件的写操作 随机文件的打开和关闭 要打开随机文件，可以使用Open语句。读者在使用Open语句打开随机文件之前必须定义与数据类型一致的变量，该语句的语法如下所示。 Open pathname For mode [Access access] [Lock] As [#]filenumber Len=reclength 以下代码演示了如何使用Open语句打开一个随机文件。 01 随机文件Open语句使用演示 02 Private Type worker 建立自定义数据类型worker 03 id As String * 4 定义工人的Id号 04 name As String * 8 定义工人的姓名 05 emp As String * 8 定义工人的职务 06 End Type 07 08 Private Sub Command1_Click() 打开随机文件 test.dat 09 Dim n As worker 定义worker变量 10 Open App.Path \test.dat For Random As #1 Len = Len(n)