第9章 (34)教师用书配套课件

《Visual Basic程序设计简明教程》
9.4 文件操作
读写操作是文件操作的重要组成部分，它针 对的是文件内容。
文件操作还有删除、复制和重命名等等，这 些操作主要是针对文件整体。
VB提供了一组语句和函数，使得程序员可 以对文件或者目录进行一些维护性操作。
19
2019/12/20
《Visual Basic程序设计简明教程》
7
2019/12/20
《Visual Basic程序设计简明教程》
9.2 文件打开与关闭——文件关闭
VB语言为文件关闭提供Close语句，其格式为： Close[[#]文件号][,[#]文件号…]
说明：如果省略文件号，则系统会将程序中所 有已经打开的文件全部关闭。
例如关闭1号文件和2号文件，可以写为：
17
2019/12/20
《Visual Basic程序设计简明教程》
2．Get语句
Get语句用于从随机文件读取指定位置的记录， 并把它赋给一个记录变量。其格式为： Get #文件号,[记录号],变量
说明：Get语句的格式与Put语句基本相同， 其作用则正好相反。
返回
18
2019/12/20
9
2019/12/20
《Visual Basic程序设计简明教程》
例9.1 输入学生信息，并写入到文件test01.txt中
Private Sub Command1_Click() Dim n As Integer, i As Integer, name As String, age% n = Val(Text1.Text) Open "d:\test01.txt" For Output As #1 '打开文件 For i = 1 To n name = InputBox("请输入第" & i & "个学生的姓名") age = InputBox("请输入第" & i & "个学生的年龄") Print #1, name; age '向文件写入学生的姓名和年龄 Next i Close #1 '关闭文件 End Sub
9.4 文件操作——文件操作语句
1．FileCopy语句 FileCopy语句用于将源文件复制到指定的目 标文件，其格式为：
FileCopy 源文件名,目标文件名 2．Kill语句 Kill语句用于删除指定的文件，其格式为：
Kill 文件名
20
2019/12/20
《Visual Basic程序设计简明教程》
13
2019/12/20
《Visual Basic程序设计简明教程》
例9.3 显示文件test01.txt中的信息
Private Sub Command1_Click() Dim name As String, age% Open "d:\test01.txt" For Input As #1 '打开文件 Do While Not EOF(1) Input #1, name, age '从文件读出学生的姓名和年龄 Picture1.Print name, age Loop Close #1 ‘关闭文件
（5）文件号是一个整型表达式，该参数是必选项，取值 范围在1~511之间。在执行Open语句时，系统自动为打开的文件 和文件号之间建立关联。此后文件号就代表打开的文件，在程 序中对该文件的操作都要借助于文件号。
（6）记录长度是一个整型表达式，其取值不能超过32767。 对于顺序文件，该参数是指缓冲区的字符数，默认值是512；对 于随机文件，该参数是指记录的长度，默认值是128。
《Visual Basic程序设计简明教程》
9.4 文件操作——文件操作函数
1．FreeFile函数 FreeFile函数的格式为：
（2）表达式列表列出向文件写入的信息，它的用法与Print 方法相同。该参数是可选项，如果被省略，则表示向文件写入 一个空行。
（3）如果用分号（;）分隔表达式列表中的数据项，按照紧 凑格式写入数据；如果用逗号（,）分隔数据项，按照标准格 式写入数据。
（4）对于字符串数据，如果其中含有逗号、分号、空格或 者换行符，则应该先给字符串加上双引号（“”），然后写入 文件。
16
2019/12/20
《Visual Basic程序设计简明教程》
1．Put语句
Put语句用于将记录变量中的数据，写入到随机文件 中指定的记录位置。其格式为： Put #文件号,[记录号],变量
说明：记录号是一个自然数，表示写入的是第几条记 录。如果省略了记录号，例如写为： Put #1,,stu 则表示把变量中的记录写入到文件的下一个记录位置。
Close #1,#2
返回
8
2019/12/20
《Visual Basic程序设计简明教程》
9.3 文件读写——顺序文件
1．Print语句 Print语句用于将格式化的数据写入顺序文件，其格式为： Print #文件号,[表达式列表][;|,] 说明：
（1）Print语句的格式与Print方法十分相似，其差别在于 Print语句增加了一个文件号参数。Print语句输出的对象是文 件，而Print方法输出的对象则是窗体、图片框和打印机。
Append
在文件尾部顺序输出
Random
随机存取
Binary
二进制方式
6
2019/12/20
《Visual Basic程序设计简明教程》
（3）存取类型位于关键字Access之后，用来指定所访问 文件的类型。
（4）锁定只在网络或者多任务环境中使用，其作用是限 制其他用户或者进程对已打开的文件进行读写操作。
二进制文件的访问同样可以采取随机存取方式，直 接读取某一个字节。
二进制文件允许程序按照所需的任何方式组织数据，
并且适用于存取任意结构的数据。
返回
4
2019/12/20
《Visual Basic程序设计简明教程》
9.2 文件打开与关闭
对磁盘文件的操作，主要有打开、读、写、 关闭和删除等等。
15
2019/12/20
《Visual Basic程序设计简明教程》
9.3 文件读写——随机文件
随机文件由一组相同长度的记录组成， 是以记录为单位进行文件的读写操作。在程 序中打开一个随机文件之前，应先定义一个 记录类型，与该文件所包含的记录结构相对 应。 在打开随机文件之后，既可以进行写操 作，也可以进行读操作，而且能够直接定位 在任意一条记录上。
[Len=记录长度] 说明：
（1）文件名是一个字符串，该参数是必选项，用来指定需要打开 的文件。如果该文件不在当前目录中，则在文件名中必须包含路径名。
（2）模式位于关键字For之后，用来指定文件的操作方式。一共 有5种方式，其中默认方式是Random。
模式
含义
Input
顺序输入
Output
顺序输出
第9章 文件
本章内容：
概述 文件打开与关闭 文件读写 文件操作 文件系统控件
1
2019/12/20
9.1 概述
文件（file）是指具有文件名的相关数据的集合， 一般把它保存在外部存储介质中（例如磁盘）。 VB文件由记录组成，记录由字段组成，字段则由 字符组成。 VB语言提供了一些语句和函数，专门用来完成文 件的输入输出等操作。 按照文件的存取方式进行分类，VB文件一般可以 分为顺序文件、随机文件和二进制文件。
10
2019/12/20
《Visual Basic程序设计简明教程》
2．Write语句
Write语句也能够将数据写入顺序文件，其格式 为： Write #文件号,[输出列表]
说明：
（1）输出列表列出向文件写入的信息，其中的 各个数据项之间用逗号（,）分隔。
（2）Write语句的功能与Print语句基本相同。 其差别在于Write语句写入的数据在文件中按照紧凑 格式存放，而且自动在数据之间插入逗号（,），并 给字符串加上双引号。
对文件操作时，必须遵循“先打开，后读 写，最后关闭”的原则。
5
2019/12/20
《Visual Basic程序设计简明教程》
9.2 文件打开与关闭——文件打开
VB语言为文件打开提供Open语句，其格式为： Open 文件名[For 模式][Access 存取类型][锁定]As[#]文件号
3．Name语句 Name语句用于对文件重命名，其格式为：
Name 原文件名 As 新文件名
4．Seek语句 Seek语句用于设置文件的下一个读写位置，其 格式为：
Seek #文件号,位置 5．ChDrive语句 ChDrive语句用于设置当前驱动器，其格式为：
ChDrive 驱动器名
21
2019/12/20
11
2019/12/20
《Visual Basic程序设计简明教程》
例9.2 追加信息到文件test01.txt
Private Sub Command1_Click() Dim n As Integer, i As Integer, name As String, age% n = Val(Text1.Text) Open "d:\test01.txt" For Append As #1 '打开文件 For i = 1 To n name = InputBox("请输入第" & i & "个学生的姓名") age = InputBox("请输入第" & i & "个学生的年龄") Write #1, name, age '向文件写入学生的姓名和年龄 Next i Close #1 '关闭文件 End Sub