VB教案－文件系统控件.docVIP

[教案] 第十一课 　文件系统控件 授课方式：讲授法 授课学时：2学时 教学目的： 通过本次课的学习，学生应该掌握驱动器列表框、目录列表框和文件列表框这三个文件系统控件的使用，掌握顺序访问模式和随机访问模式的四种操作。 教学重点和难点： 1．文件系统控件使用； 2．顺序访问模式的四种操作； 3．随机访问模式的四中操作。 教学过程： 一、 文件系统控件 1．文件系统控件的组成 由驱动器列表框、目录列表框和文件列表框三个控件组成 2．驱动器列表框（DriveListBox） 驱动器列表框的主要用途、重要属性、事件及语句 3．目录列表框（DirListBox） 目录列表框的主要用途、重要属性、事件及语句 4．文件列表框（FileListBox） 文件列表框的主要用途、重要属性、事件及语句 5．文件系统控件的组合设计 通过例题讲解组合设计中需要注意的几点问题 二、 文件的读写 1．文件的访问模式 （1）种类：三种--顺序访问模式、随机访问模式和二进制访问模式 （2）把三种访问模式对比的讲解他们的优缺点 （3）文件访问的步骤 2．顺序访问模式 （1）该访问模式适合访问的文件类型 （2）有关的四种基本操作--打开文件、读文件、写文件和关闭文件的命令及其语法格式 3．随机访问模式 （1）该访问模式适合访问的文件类型 （2）有关的四种基本操作--打开文件、读文件、写文件和关闭文件的命令及其语法格式 学生作业： 上机实验七：文件系统控件 [讲稿] （十一） 文件系统控件 11.1 文件系统控件 文件系统控制有三种：驱动器列表框（DriveLinBox）目录列表框（Dirlistbox）和文件列表框（Filelistbox） 驱动器列表框 Drivelistbox 属性 Drive~指明当前选定的驱动器名 Eg,Drive1.Drive=”c:\” ChDrive 语句 详见P153 若用Drive属性变更驱动器，则 ChDrive Dive1,Drive change 事件‘ change事件是在选择一个新的驱动器或通过代码改变Drive属性的设置时发生 二、目录列表框 Dirlistbox 属性 Path～返回或设置列表框中当前目录 ChDir语句～设置当前的工作目录 P153 Change事件 Click事件 三、文件列表框 Filelistbox 1、作用 运行时显示有Path属性指定的目录中的文件。 2、属性 1）Path~~当前路径（同目录列表框的Path） 2）FileName~~选定的文件名 3）Pattern~~显示的文件类型 例如：显示所有扩展名为.frm和.bas的文件 File1.Pattern=“*.frm;*.bas” 3、事件 1）PathChange~~当文件列表框的Path属性 改变时触发 2）PatternChange~~当文件列表框的Pattern 属性改变时触发 3）Click 4）DblClick 三、 文件系统控件的组合使用 三个文件系统控件必须协调工作才能构成一个文 件管理系统。为了使它们之间能产生同步效果，需要编 写如下事件过程。 1）当用户在驱动器列表框中选中一个新的驱动器后，目录列表框中的目录也随之改变。 Private Sub Drive1_Change() Dir.Path=Drive1.Drive End Sub 2)当目录列表框的目录发生改变时，文件列表框 中的文件也随之改变 Private Sub Dir1_Change() File1.Path=Dir1.Path End Sub 访问驱动器和文件夹的传统方法 （常用的文件操作语句） 教材P153~154 11.2 文件的读写 1、读操作 Input #文件号，变最列表 该语句是从文件中读取出数据，并将读出的数据分别赋值给指定的变量 为了能够用Input#语句将文件中的数据正确地读出，在将数写入文件时，要使用Write#语句而不使用Print#语句。因为Write#语句能将各个数据项正确地区分开。 Line Input #文件号，字符串变量 该语句是从文件中读出一行数据，并将读出的数据赋给指定的字符串变量。读出数据中不包含回车符及换行符。 Input$(读取的字符数，#文件号) 调用该函数可以读取指定数目的字符 LOF()函数 ～返回文件的字节数。 EOF()函数 （只适用于顺序文件） ～ 返回一个表示文件指针是否到达文件末尾的值，当到文件末尾时，EOF（）函数返回True，否则返回False (6