vb编程技术文件驱动器和文件夹.ppt

第11章文件、驱动器和文件夹11.1文件系统控件11.2文件系统对象11.3传统的文件I/O语句和函数习题十一

11.1文件系统控件11.1.1驱动器列表框驱动器列表框DriveListBox是下拉式列表框，它与目录列表框、文件列表框一样，有许多标准属性，包括Enabled、Visible等。

图11.1在运行期间的驱动器列表框

11.1.2目录列表框目录列表框用来显示当前驱动器上的目录结构，刚建立时显示当前驱动器的顶层目录和当前目录。顶层目录用翻开的文件夹表示，当前目录用加阴影的文件夹表示，当前目录下的子目录用关闭的文件夹表示，如图11.2所示。

图11.2在设计阶段的目录列表框

11.1.3文件列表框用驱动器列表框和目录列表框可以指定当前驱动器和当前目录，而文件列表框可以用来显示当前目录下的文件(可以通过Path属性改变)。文件列表框的默认控件名是File1。与文件列表框有关的属性较多，其主要属性如表11-1所示。

表11-1文件列表框的常用属性

【例11-1】在实际应用中，驱动器列表框、目录列表框和文件列表框往往需要同步操作，请编写程序使三者同步。可以通过改变Path属性来引发Change事件：PrivateSubDir1_Change()File1.Path=Dir1.PathEndSub

该事件过程使窗体上的目录列表框Dir1与文件列表框File1产生同步。类似地，增加下面的事件过程，就可以使三者同步。PrivateSubDrive1_Change()Dir1.Path=Drive1.DriveEndSub同步操作情况如图11.3所示。

图11.3使驱动器列表框、目录列表框、文件列表框三者同步

11.2文件系统对象11.2.1文件系统对象的概念1.FileSystemObject模型VB6.0具有FSO模型功能，该模型提供了一个基于对象的工具来处理文件夹和文件。2.文件系统对象(FileSystemObject)FSO模型包括表11-2所示的对象。

表11-2FSO模型中的对象

FSO模型包含在一个称为Scripting的类型库中，此类型库位于Scrrun.Dll文件中。如果还没有引用此文件，从“工程〞菜单的“引用〞对话框中选择“MicrosoftScriptingRuntime项，如图11.4所示，然后就可以使用“对象浏览器〞来查看其对象、集合、属性、方法、事件以及常数。

图11.4“引用〞对话框

11.2.2使用文件系统对象编程1.创立FileSystemObject对象使用文件系统对象编程，首先必须创立一个FileSystemObject对象，然后才能使用其方法、属性来管理驱动器、文件夹和文件等对象。

有两种方法可以创立一个FileSystemObject对象。(1)将一个变量声明为FileSystemObject对象类型，如下所示：Dim〈变量名〉AsNewFileSystemObject(2)使用CreateObject方法来创立一个FileSystemObject对象，如下所示：Set〈变量名〉=CreateObject(Scripting.FileSystemObject)

2.使用适当的方法在FileSystemObject对象中，某些操作可以使用不同的方法，例如，想要创立一个新对象，既可以使用CreateFolder方法也可以使用CreateTextFile方法。(FSO对象模型不支持创立或删除驱动器。)

3.访问已有的驱动器、文件和文件夹要访问一个已有的驱动器、文件或文件夹，可使用FileSystemObject对象中相应的“Get〞方法：GetDrive、GetFolder、GetFile。4.访问对象