Visual Basic程序设计教程（第二版） 郭清溥 8新.ppt

第8章 数据文件 第8章 数据文件 第8章 数据文件 8.1 文件系统控件 8.1 文件系统控件 8.1 文件系统控件 8.1 文件系统控件 8.1 文件系统控件 8.1 文件系统控件 8.1 文件系统控件 8.1 文件系统控件 8.1 文件系统控件 8.2 文件的访问 8.2 文件的访问 8.2 文件的访问 8.2 文件的访问 8.2 文件的访问 8.2.1 文件概述 4.文件操作的一般步骤 第1步，打开/建立文件 第2步，操作文件 第3步，关闭文件 8.2 文件的访问 关闭文件的命令： Close语句的一般格式为： Close [[#] 文件号] [,[#] 文件号] 说明： Close语句用来关闭文件，所以是在打开文件之后进行的操作。 文件号为Open语句中的文件号，如果指定了文件号，则关闭所指定的文件；如果省略了文件号则关闭所有打开的文件。 如：Close #1, #2 关闭打开的#1和#2文件 Close 关闭所有打开的文件 8.2 文件的访问 8.2.2 文件操作语句和函数 文件打开之后，系统会自动生成一个文件指针。文件指针是可以移动的，每一次的读写操作之后，文件指针会自动移到下一个读写位置，移动量的大小由文件分量的大小来决定。 8.2 文件的访问 8.2.2 文件操作语句和函数 （1） Seek函数 格式：Seek(filenumber) 功能：返回下一个读或写操作的起始位置。 （2） Seek语句 格式：Seek[#]filenumber，position 功能：把由filenumber所代表的文件的指针移动到由position指定的读/写位置。 8.2 文件的访问 8.2.2 文件操作语句和函数 （3）EOF函数（文件结束函数） 格式：EOF（ filenumber ） 功能：用于测试由filenumber指定的文件的指针是否指向文件的末尾。 若文件指针指向文件的末尾，则返回值为True； 否则，返回值为False。 （4）Loc函数（文件定位函数） 格式：Loc (filenumber ) 功能：返回由filenumber所代表的文件当前的读写位置。 8.2 文件的访问 8.2.2 文件操作语句和函数 （5）LOF函数 （文件长度函数） 格式：LOF（ filenumber ） 功能：返回由filenumber代表的文件所包含的字节数。? （6）FreeFile函数 格式：FreeFile 功能：返回当前未被使用的最小文件号。 8.2 文件的访问 8.2.3 顺序文件（Sequential File） 8.2 文件的访问 8.2.3 顺序文件（Sequential File） 1.顺序文件的打开 格式：Open 文件名 For 方式 As [#] 文件号 功能：建立一个新的顺序文件或打开现有的顺序文件 说明： 文件名是要打开的文件名，可以包含驱动器和路径 文件名可以是一个实际的文件名，也可以是一个字符串变量，该字符串变量中存放一个实际文件名。 8.2 顺序文件 8.2 顺序文件 8.2 顺序文件 8.2 顺序文件 8.2 文件的访问 8.2.3 顺序文件（Sequential File） 1.顺序文件的打开 8.2 文件的访问 8.2.3 顺序文件（Sequential File） 1.顺序文件的写操作 （1）Print#语句 功能：把格式化显示的数据写入顺序文件中。 格式：Print #文件号, [{|Spc(n)|tab[(n)]}][表达式表][;|,] 说明： 文件号：任何有效的文件号。 Spc(n)：输出数据中插入空白字符，数字n表示要插入的空白字符个数。 tab(n)：用来将插入点定位在某一绝对列号上，n是列号。 表达式表：要打印的数值表达式或字符串表达式。 数据写入文件的格式与使用Print方法获得的屏幕输出格式相同。 8.2 文件的访问 8.2.3 顺序文件（Sequential File） 1.顺序文件的写操作 （2）Write#语句 功能：以紧凑格式将数据写入顺序文件中，在数据项之间插入“,”，并给字符串加上双引号。 格式：Write # 文件号, [输出列表] 说明： 1)Write #首先对各表达式求值，然后把值按规定格式写入文件。各输出项可以是字符串表达式或数值表达式，各项之间以逗号或分号分隔。 2)当输出项表以逗号结束时，后续语句写入的输