VB实验15 文件操作

第13页 Visual Basic程序设计实验指导
实验15-3
目的和要求 预备知识
上一页
下一页
退 出
【题目】 课程表维护。应用随机 文件，实现课程表信息的 查看和添加功能。每条记 录包含的字段有课程代号 （ Num ） 、 课 程 名 称 （ CourseName ） 、 课 程性质（ Quality ）、学 时 数 （ Period ） 和 学 分 （ CdHour ），程序的运 行界面如图15-3所示。
第8 页 Visual Basic程序设计实验指导
实验15-2
目的和要求 预备知识
上一页
【题目】 顺序文件的操作。打开磁盘上的一个文本文件， 将其内容显示在文本框中，然后在文本框中修改文 件内容，并将修改结果保存在原文件中。
下一页
退 出
第9 页 Visual Basic程序设计实验指导
实验15-2
第7 页 Visual Basic程序设计实验指导
实验15-1
目的和要求 预备知识
上一页
下一页
退 出
【实验步骤】 （1）界面设计 请参照图15-1所示的界面设计窗体。 （2）完善程序代码 （3）运行工程并保存文件 预先准备好一些图片文件，运行程序，选择图 片文件，观察运行结果，最后将窗体文件保存为 F15-1.frm，工程文件保存为P15-1.vbp。
实验15-3
目的和要求 预备知识
上一页
【分析】 首先要添加一个标准模块，在标准模块中用 Type 建立一个记录结构类型，字符串类型的字段 必须用定长字符串类型，在窗体的通用声明部分， 定义一个记录类型的变量。
下一页
退 出
第16页 Visual Basic程序设计实验指导
实验15-3
目的和要求 预备知识
第14页 Visual Basic程序设计实验指导
实验15-3
目的和要求 预备知识
上一页
下一页
退 出
【要求】 （1）程序运行时，将C:\Course.txt文件打 开，并显示第一条记录的内容。 （2）处理好4个命令按钮之间的有效性。 （3）4个命令按钮和 5个文本框都使用控件数 组。
第15页 Visual Basic程序设计实验指导
上一页
下一页
退 出
【实验步骤】 （1）界面设计 请参照图15-3所示的界面设计窗体。 （2）添加程序代码 ① 在标准模块中添加代码： ② 在窗体中添加代码： （3）运行工程并保存文件 运行程序，观察运行结果，最后将窗体文件保 存为F15-3.frm，标准模块文件保存为M15-3.bas， 工程文件保存为P15-3.vbp。
第17页 Visual Basic程序设计实验指导
实验15-4
目的和要求 预备知识
【题目】 加密和解密。利用异或算法对二进制文件进行加 密和解密。
上一页
下一页
退 出
Leabharlann Baidu第18页 Visual Basic程序设计实验指导
实验15-4
目的和要求 预备知识
上一页
下一页
退 出
【要求】 （ 1 ）编写一个通用的 Sub 过程对文件进行 加密和解密。 （ 2 ）编写一个通用的 Sub 过程，显示文件 内容。 （3）窗体上的两个命令按钮使用控件数组。
第11页 Visual Basic程序设计实验指导
实验15-2
目的和要求 预备知识
上一页
下一页
退 出
（2）以写方式打开一个文件，语句格式如下： Open FileName For Output As #FileNumber For Output：以写方式打开顺序文件 （3）以追加方式打开一个文件，语句格式如下： Open FileName For Append As #FileNumber For Append：以追加方式打开顺序文件 打开文件后，就可对文件以指定方式进行操作。例如， 读取用Input命令或Line Input命令，写入用Print命令 或Write命令。 操作完成后，将文件关闭。例如，Close #1，表示关 闭1号文件。
实验12-4
目的和要求 预备知识
上一页
下一页
退 出
【实验步骤】 （1）界面设计 请参照图 15-4 所示的界面设计窗体。 Text1 设置为 多行文本框，并设置显示水平滚动条和垂直滚动条。两个 命令按钮使用控件数组。 事先建立文件 C:\data.txt ，文件内容可参照图 154所示输入。 （2）添加程序代码 （3）运行工程并保存文件 运行程序，单击“加密”和“解密”按钮，观察运行 结果，最后将窗体文件保存为 F15-4.frm ，工程文件保存 为P15-4.vbp。
实验
目的和要求 预备知识
15
文件操作
上一页
下一页
退 出
第1 页 Visual Basic程序设计实验指导
一、目的和要求
目的和要求 预备知识
上一页
下一页
退 出
掌握文件管理控件的使用方法 掌握顺序文件、随机文件和二进制文件 的特点和区别 掌握三种类型文件的建立和数据的读/写 方法 掌握常用文件操作函数和文件操作命令 的使用方法
第21页 Visual Basic程序设计实验指导
目的和要求 预备知识
上一页
下一页
退 出
【要求】 （1）预先用记事本在C盘根目录中建立一个文 本文件File.txt，文件内容自行输入。 （ 2 ）单击“打开”按钮，打开 File.txt 文件， 并将其内容显示在文本框中。 （ 3 ）修改文本框中的内容，单击“保存”按 钮，将修改结果保存在原文件中。 程序运行界面如图15-2所示。
第12页 Visual Basic程序设计实验指导
实验15-2
目的和要求 预备知识
上一页
下一页
退 出
【实验步骤】 （1）界面设计 请参照图15-2所示的界面设计窗体。 （2）完善程序代码 （3）运行工程并保存文件 运行程序，观察运行结果，最后将窗体文件保 存为F15-2.frm，工程文件保存为 P15-2.vbp。
第19页 Visual Basic程序设计实验指导
实验15-4
目的和要求 预备知识
上一页
下一页
退 出
【分析】 异或算法有这样一个特点： 若A Xor B = C，则C Xor B = A（A、B、 C都是数字）。 利用这个特点，可以对文件进行加密和解密。 这里的A是明码，C是密码，而B是密钥。
第20页 Visual Basic程序设计实验指导
第10页 Visual Basic程序设计实验指导
实验15-2
目的和要求 预备知识
上一页
下一页
退 出
【分析】 对顺序文件的操作必须先用 Open 语句打开该文件，打 开方式有读方式、写方式和追加方式三种。以某种方式打开 后，只能以此方式操作该文件。 （1）以读方式打开一个文件，语句格式如下： Open FileName For Input As #FileNumber FileName：文件名，包含路径 For Input：以读方式打开顺序文件 FileNumber：给文件分配一个文件号（1～512）， 以后使用此文件号对该文件进行操作。
第3 页 Visual Basic程序设计实验指导
三、实验内容
目的和要求 预备知识
上一页
下一页
退 出
实验15-1 实验15-2 实验15-3 实验15-4
第4 页 Visual Basic程序设计实验指导
实验15-1
目的和要求 预备知识
【题目】 简易图片浏览器。按图 15-1 所示设置程序的运 行界面，制作一个简易的图片浏览器。
第2 页 Visual Basic程序设计实验指导
二、预备知识
目的和要求 预备知识
上一页
下一页
退 出
在 Visual Basic 中，与文件管理相关的控件有驱动器 列表框（DriveListBox）、目录列表框（DirListBox） 和文件列表框（FileListBox）。通过相关属性和代码设置 就可以实现对文件和文件夹的访问与操作。具体内容请参见 教材相关章节。 Visual Basic 可直接访问顺序文件、随机文件和二进 制文件，对每一种类型文件的访问，大致有以下三个步骤： （1）打开文件，使用Open语句。 （ 2 ）对文件进行读或写操作，不同的文件访问类型， 使用不同的关键字。 （3）关闭文件，使用Close语句或Reset语句。
第6 页 Visual Basic程序设计实验指导
实验15-1
目的和要求 预备知识
上一页
下一页
退 出
【分析】 要实现驱动器列表框和目录列表框之间的同步变化，应 在驱动器列表框的Change事件代码中写入以下语句： Dir1.Path = Drive1.Drive 要实现目录列表框和文件列表框之间的同步变化，应在 目录列表框的Change事件代码中写入以下语句： File1.Path = Dir1.Path 要用程序方式控制显示在图象框或图片框中的图片，应 使用LoadPicture（PictureName）函数。 要使文件列表框中显示指定类型的文件，应设置文件列 表框的Pattern属性。
上一页
下一页
退 出
第5 页 Visual Basic程序设计实验指导
实验15-1
目的和要求 预备知识
上一页
下一页
退 出
【要求】 （1）在窗体上添加一个驱动器列表框对象 Drive1 、一个目录列表框对象 Dir1 、一个文件 列表框对象 File1 、一个图象框对象 Image1 和 两个框架对象Frame1和Frame2。 （ 2 ）当在文件列表框中选择一个图片文件时， 所选择的图片立即显示在Image1对象中。 （ 3 ）三个文件管理控件要求同步变化，文件 列表框File1中只能显示图片类型文件。