Visual Basic程序设计教程.ppt

2020 1 27 计算机技术基础系列课程课件 1 VisualBasic程序设计教程 VisualBasic程序设计教程 2020 1 27 计算机技术基础系列课程课件 2 第九章文件 9 1顺序文件9 2随机文件9 3二进制文件9 4驱动器列表框 目录列表框和文件列表框 2020 1 27 计算机技术基础系列课程课件 3 文件是存储数据的基本单位 任何对数据的访问都是通过文件进行的 系统通过对文件 文件夹的管理达到管理数据信息的目的 可以从不同的角度对文件进行分类 例如 按文件的存储介质不同 按文件的存储内容不同 按文件的访问方式不同 又可以将文件分为顺序文件 随机文件和二进制文件 2020 1 27 计算机技术基础系列课程课件 4 顺序文件要顺序进行读写 操作分为三步 打开文件读或写文件关闭文件9 1 1顺序文件的打开打开顺序文件使用Open语句 格式 OpenFor Input Output Append As Len 功能 按指定方式打开一个文件 并为文件指定一个文件号 9 1顺序文件 2020 1 27 计算机技术基础系列课程课件 5 一个字符串表达式 可以包含驱动器符及文件夹 Input 表示以只读方式打开文件 Output 表示以写方式打开文件 如果文件不存在 就创建一个新的文件 如果文件已经存在 则删除文件中的原有数据 从头开始写入数据 Append 表示以添加的方式打开文件 如果文件不存在 就创建一个新的文件 表示打开文件的文件句柄 是一个介于1 511之间的整数 表示可使用的缓冲区的字节数 2020 1 27 计算机技术基础系列课程课件 6 要在C盘Data文件夹下建立一个名为Student dat的顺序文件 使用Open语句 Open C Data Student dat ForOutputAs l打开当前盘当前文件夹下名为Salary dat的顺序文件 以便从中读取数据 Open Salary dat For工nputAs 8打开C盘Data文件夹下名为Student dat的文件 以便在文件尾添加数据 Open C Data Student dat ForAppendAs2 2020 1 27 计算机技术基础系列课程课件 7 格式 Close 包括一个到多个已经打开的文件的文件号 各项之间用逗号隔开 省略时则关闭所有已打开的文件 例如 关闭文件号为1的文件 Close l关闭文件号为1 2 8的文件 Close 1 2 8 文件号前的 号可以省略关闭所有文件 Close 9 1 2顺序文件的关闭 2020 1 27 计算机技术基础系列课程课件 8 1 Write 语句格式 Write 功能 将的内容写入指定的文件中 其中 中各项之间要用逗号分开 每一项可以是常量 变量或表达式 Write 语句将各输出项的值按列表顺序写入文件 并在各值之间自动插入逗号 并且将字符串加上双引号 所有变量写完后 将在最后加入一个回车换行符 不含的Write 语句 将在文件中写入一空行 9 1 3顺序文件的写操作 2020 1 27 计算机技术基础系列课程课件 9 2 Print 语句格式 Print 功能 将的内容写入指定的文件中 中各项要用逗号或分号隔开 当用逗号分隔时 采用分区格式输出 当用分号分隔时 采用紧凑格式输出 所有项将在一行内输出 所有项输出后将自动换行 每一项可以是常量 变量或表达式 Print 语句与Write 语句不同 用Print 语句输出后 文件中的字符串没有被加上引号 各项之间没有逗号分隔 另外 中可以使用Spc 函数和Tab 函数 2020 1 27 计算机技术基础系列课程课件 10 例如 Print 1 函数 Spc 8 实验 在 函数 和 实验 间留有8个空格Print 1 定位 Tab 8 实验 实验 将写在第8列开始的地方用Write 语句和Print 语句产生的两种不同格式的数据文件 用Write 语句生成的数据 001 张三 87 92 002 李四 76 89用Print 产生的数据 001张三8792002李四7689 2020 1 27 计算机技术基础系列课程课件 11 VB允许使用多种方式来读取顺序文件中的数据 1 Input 语句格式 Input 功能 从文件中读取一行数据 并将这些已格式化的数据 依次读人所列的各变量中 读出数据的类型要与变量列表中变量的类型相匹配 否则会读出错误的结果 Input 语句常与Write 语句配合使用 9 1 4顺序文件的读操作 2020 1 27 计算机技术基础系列课程课件 12 2 Linelnput 语句格式 Linelnput 功能 从文件中读取一行数据 即读取从行首到回车换行符之间的所有字符 不包括回车和换行符 读出的字符串放在中 该语句常与Print 配合使用 读顺序文件的过程中 可以使用EOF函数判断是否已读到了文件尾 EOF函数使用格式为 EOF 该函数返回一个布尔值 当返回值为True时 表明已经到达文件的末尾 2020 1 27 计算机技术基础系列课程课件 13 随机文件中的数据是以记录的形式存放的 通过指定记录号就可以快速地访问相应的记录 打开随机文件后 在读出数据的同时允许对数据进行修改 写入 VB对随机文件的访问具有严格的限制 随机文件中的每条记录的长度是相同的 每条记录相对应的字段的数据类型必须相同 所以在对随机文件操作前常常先定义一种数据结构来存放写入或读出的数据 然后再打开文件进行读写操作 操作完成后还要关闭文件 9 2随机文件 2020 1 27 计算机技术基础系列课程课件 14 1 随机文件的打开对随机文件存取之前也必须先打开文件 打开随机文件也使用Open语句 格式 Open ForRandom AsLen ForRandom表示打开随机文件 可以省略 通常就是自定义类型的大小 当使用带参数Random的Open语句打开随机文件时 如果文件已经存在则直接打开 否则建立一个新的文件 2 随机文件的关闭随机文件的关闭同样使用Close语句 例如 Close 1语句表示关闭文件号为1的文件 9 2 1随机文件的打开和关闭 2020 1 27 计算机技术基础系列课程课件 15 1 写文件VB使用Put语句向随机文件中写数据 格式 Put 功能 将一个变量的数据写人随机文件中 若文件中已有此记录 则该记录将被新数据覆盖 若文件中无此记录 则在文件中添加一条新记录 如果省略 则写人数据的记录号为上次读或写的记录的记录号加1 通常是一个自定义类型的变量 也可以是其他类型的变量 9 2 2随机文件的读写 2020 1 27 计算机技术基础系列课程课件 16 2 读文件VB使用Get语句从随机文件中读取数据 格式 Get 功能 将一个已打开的随机文件的一条记录读人一个变量之中 的含义与Put相同 通常是用户自定义类型 用于接收从随机文件中读取的记录 2020 1 27 计算机技术基础系列课程课件 17 9 3二进制文件 二进制文件是一个字节流 文件系统并不解释各字节的意义 解释工作由具体的应用程序完成 以二进制方式访问文件有下述特点 可以直接访问文件中的所有数据 由应用程序根据需要解释数据的意义 访问文件的语句不更改原始数据的所有内容 二进制文件每一次读写是以字节为单位对数据进行访问操作的 它允许用户读写或修改文件中的任何字节信息 当要保持文件的尺寸尽量小时 应使用二进制文件 2020 1 27 计算机技术基础系列课程课件 18 一 二进制文件的打开Open 文件名 ForBinaryAs 文件号二 二进制文件的写操作Put 文件号 位置 变量名写入长度等于变量长度的数据 三 二进制文件的读操作GET 文件号 位置 变量名从指定位置开始读出长度等于变量长度的数据存入变量中 数据读出后移动变量长度位置 9 4二进制文件 2020 1 27 计算机技术基础系列课程课件 19 9 4文件系统控件 VB为用户提供了三个文件系统控件 驱动器列表框 DriveListBox 目录列表框 DirListBox 文件列表框 FileListbox 它们都能自动从操作系统获取信息 让用户了解有关驱动器 目录和文件的当前状态 这三个控件可以单独使用 也可以组合起来使用 组合使用时 可在各控件的事件过程中编写代码 建立它们之间的联系 产生联动的关系 2020 1 27 计算机技术基础系列课程课件 20 驱动器列表框是一种能显示系统中所有有效磁盘驱动器的列表框 1 属性Drive属性 返回或设置磁盘驱动器的名称 可以是任何一个有效的字符串表达式 该字符串的第一个字母必须是二个有效的磁盘驱动器符号 改变Drive属性的设置值将激活Change事件 从列表框中选择驱动器并不能自动地变更系统当前的工作驱动器 要改变系统当前的工作驱动器需要使用ChDrive语句 例如 rDrive Drivel Drive 读取驱动器Drivel Drive c 设置驱动器ChDrive C 表示将驱动器c 变成当前工作驱动器 驱动器列表框 DriveListBox 2020 1 27 计算机技术基础系列课程课件 21 2 事件驱动器列表框的常用事件为Change事件 当选择一个新的驱动器或通过代码改变Drive属性的设置时触发该事件 例如 将在驱动器列表中选择的驱动器设置为当前驱动器 可以在该事件过程中编写代码 PrivateSubDrivel Change ChDriveDrivel DriveEndSub 驱动器列表框 DriveListBox 2020 1 27 计算机技术基础系列课程课件 22 目录列表框通过显示一个树型的目录结构来列出当前驱动器下的分层目录 其中每一行代表一级目录 当用鼠标双击某一目录时 将打开该目录并显示其子目录 1 属性Path属性 返回或设置当前工作目录的完整路径 当改变Path属性时 将激活一个Change事件 设置Path属性相当于改变了目录列表框的当前目录 在目录列表框中选择目录并不能改变系统的当前目录 要想真正改变系统当前目录必须使用ChDir语句 2 事件目录列表框的常用事件为Change事件 当双击一个目录项或通过代码改变Path属性的设置时触发该事件 目录列表框 DirListBox 2020 1 27 计算机技术基础系列课程课件 23 文件列表框是一个带滚动条的列表框 用来显示特定目录下的文件 编写程序时 经常用到Path属性 FileName属性 Pattern属性和Click事件 DblClick事件 1 属性Path属性 返回或设置当前目录的路径名 其值为一个表示路径名的字符串表达式 编写程序时 文件列表框的Path属性值一般由目录列表框的Path属性获得 当Path属性被设置后 文件列表框将显示当前目录下的文件 FileName属性 设置或返回所选文件的路径和文件名 当在程序中设置FileName属性时 可以使用完整的文件名 也可以使用不带路径的文件名 文件列表框 FileListBox 2020 1 27 计算机技术基础系列课程课件 24 Pattern属性 返回或设置要显示的文件类型 即按该属性的设置对文件进行过滤以显示满足条件的文件 如 TXT 等 缺省值为 如果过滤的类型不止