VB程序设计文件PPT课件

主讲教师 徐州工程学院信电学院 1 第十章文件 10 1文件的概念10 2文件的分类10 3文件的操作10 4文件控件 2 10 1文件的概念 文件是存储数据的基本单位 任何对数据的访问都是通过文件进行的 通常在计算机外存储设备上存储着大量的文件 比如文本文件 位图文件 程序文件等 常将具有相互关系的一组文件放在同一个文件夹中 系统通过对文件 文件夹的管理达到管理数据信息的目的 文件 存储在外部介质上数据的集合 3 10 2文件的分类 从不同角度对文件进行分类 按文件的内容分类 程序文件 数据文件 4 10 2文件的分类 从不同角度对文件进行分类 按存储信息的形式分类 二进制文件 ASCII文件 例 用二进制方式和ASCII方式保存100 5 10 2文件的分类 从不同角度对文件进行分类 按文件的内容分类 程序文件 数据文件按存储信息的形式分类 二进制文件 ASCII文件按访问方式分类 顺序文件 随机文件 二进制文件 6 10 2文件的分类 顺序文件 普通的文本文件 其数据是以字符 ASCII码 的形式存储的 可以用任何字处理软件 比如记事本 进行访问 优点 结构简单 可以使用记事本建立和查看 缺点 查找数据必须按照顺序进行 且不能同时对文件进行读写操作 修改不方便 适合于不经常修改的文件 7 10 2文件的分类 随机文件 以固定长度的记录为单位进行存储的 随机文件由若干条记录组成 而每条记录又可以包含多个字段 每条记录包含的字段数和数据类型都是相同的 优点 存取速度快 容易更新 缺点 占用空间大 设计程序较复杂 二进制方式存储 不方便查看 8 10 2文件的分类 二进制文件 字节的集合 直接把二进制码值存放在文件中 除了没有数据类型或者记录长度的含义外 它与随机文件很类似 二进制访问模式是以字节数来定位数据 在程序中可以按任何方式组织和访问数据 对文件中各字节数据直接进行存取 优点 灵活性很大 缺点 程序更复杂 9 10 3文件的操作 VB中文件的访问 在程序中对文件的操作 通常按照3个步骤进行 打开文件 读出或写入 关闭文件 操作系统完成 程序控制 Open Close 10 1 顺序文件的打开打开文件语句 OPEN语句格式 Open文件名 For模式 As 文件号作用 在内存中开辟文件缓冲区 将物理文件和逻辑文件关联例如 Open D Data Student dat ForInputAs 1其中 文件名 指定要打开 或创建 的文件 可包含盘符和路径模式 Input 读操作 将文件数据从外存读入内存 Output 写操作 从文件的起始处写入数据 替代原有内容 Append 追加方式 从文件结尾处开始写入数据 并保留原有数据 文件号 一个介于1 511之间的整数 又称为文件标识符或通道号 用来在文件操作中表示该文件 10 3文件的操作 11 2 顺序文件的写操作 Write 语句和Print 语句 Print 语句格式 Print 文件号 输出列表 功能 将 输出列表 的内容写入指定的文件中 例如 10 3文件的操作 Open D Data Student txt ForOutputAs 1Print 1 100 200Print 1 使用Print语句写入 Close 1 12 2 顺序文件的写操作 Write 语句和Print 语句 Write 语句格式 Write 文件号 输出列表 功能 将 输出列表 的内容写入指定的文件中 例如 10 3文件的操作 Open D Data Student txt ForOutputAs 1Write 1 100 200Write 1 使用Write语句写入 Close 1 13 用Write 语句和Print 语句写入的数据文件比较 10 3文件的操作 说明 Write 数据项之间逗号分隔 字符串用双引号括起来Print 无逗号分隔 双引号 按区 每区14个字符宽 分隔 思考 哪种写入方式好 14 3 顺序文件的读操作使用格式如下 Input 文件号 变量列表把读出的每个数据项分别存放到所对应的变量LineInput 文件号 字符串变量读取一行数据到变量中 主要用来读取文本文件 10 3文件的操作 15 3 顺序文件的读操作Input 文件号 变量列表例 注意 确定读出的数据是什么类型 设置相同类型变量接收读出的数据 Open D data student txt ForOutputAs 1Write 1 用Write 语句写入 Write 1 001 张三 87 92Write 1 002 李四 88 93Write 1 003 王五 89 94Close 1Dimno Name s1 s2 Open D data student txt ForInputAs 1DoWhileNotEOF 1 Input 1 no name s1 s2 Printno name s1 s2LoopClose 1 16 3 顺序文件的读操作LineInput 文件号 字符串变量 Open D data student txt ForOutputAs 1Write 1 用Write 语句写入 Write 1 001 张三 87 92Write 1 002 李四 88 93Write 1 003 王五 89 94Close 1Open D data student txt ForInputAs 1DoWhileNotEOF 1 LineInput 1 sPrintsLoopClose 1 17 4 顺序文件的关闭Close语句Close 文件号 文件号 例 Close 1 2 关闭1号文件和2号文件Close 关闭所有已打开的文件 10 3文件的操作 注意 关闭文件时将内存缓冲区中的数据全部写入文件 并清除缓冲区 释放全部与被关闭文件有关的VB缓冲区和表示该文件的文件号 18 与读文件操作有关的几个函数LOF函数格式 LOF 文件号 功能 返回已打开文件的字节数注意 中文占2个ByteFileLen函数格式 FileLen 文件名 功能 返回指定文件的长度EOF函数格式 EOF 文件号 功能 测试文件指针是否到达文件末尾函数结果 文件没有到达末尾返回False 否则为True 10 3文件的操作 例 s VB6 0程序设计 LOF 1 函数获得的文件字节数 13Len s 字符数 9 19 综合示例 学生信息顺序文件的读写 10 3文件的操作 说明 学生信息 由学号 姓名 性别 联系方式四个字段组成 添加按钮 使用write语句将输入的学生信息添加到数据文件 读取按钮 从指定文件读取学生信息 并显示在picture1控件上 20 PrivateSubCommand1 Click Open d data student txt ForAppendAs 1Write 1 Text1 Text Text2 Text Combo1 Text Text3 TextClose 1MsgBox 添加成功 Text1 Text Text2 Text Text3 Text EndSub PrivateSubCommand2 Click Open d data student txt ForInputAs 1DoWhileNotEOF 1 Input 1 no stuName male phonePicture1 Printno Tab 5 stuName Tab 12 male Tab 16 phoneLoopClose 1EndSub 添加数据 读取数据 21 10 4文件控件 驱动器列表框 下拉列表 用来显示系统当前驱动器的名称目录列表框 显示当前驱动器目录结构及当前目录下的子目录文件列表框 当前目录下所有文件清单 22 10 4文件控件 3种控件结合使用 PrivateSubDrive1 Change Dir1 Path Drive1 DriveEndSubPrivateSubDir1 Change File1 Path Dir1 PathEndSub 23 2 顺序文件的写操作例题 假定文本框的名称为Text1 文件名为Test dat 保存文本框中的数据 方法1 把整个文本框的内容一次性地写入文件 方法2 把整