vb之-文件系统控件.pptVIP

标准文件控件 驱动器列表框（DriveListBox） 文件夹列表框（DirListBox） 文件列表框（FileListBox） 文件列表框（FileListBox） 文件列表框（FileListBox） 2. 主要事件——Click、DblClick事件 例如：单击输出文件名。 Private Sub File1_Click() MsgBox File1.FileName End Sub 例如：双击执行可执行程序 Private Sub File1_DblClick( ) Dim Fname As String If Right(file1.path,1) =\ Then Fname=file1.path file1.filename Else Fname=file1.path \ file1.filename End If RetVal = Shell(Fname, 1) ‘ 执行程序 End Sub 三个标准文件控件的组合编程 综合举例 使用ShowOpen方法显示“打开”对话框。 使用ShowSave方法显示“另存为”对话框。 这两个对话框统称为文件对话框，具有类似的外观和相同的属性。 文件对话框的主要属性 FileName：要打开或保存文件的路径和名称（含路径）。 FileTitle ：要打开或保存文件名（没有路径）。 Filter ：设置在对话框的类型列表框中所显示的文件类型。 格式：对象名.Filter= 描述文本1 |过滤条件1 [；...] 例：CommonDialog1.Filter = 文本文件|*.TXT;*.c |Word文档|*.doc CommonDialog1.ShowOpen 注意：要先设置过滤条件，再使用文件对话框。 InitDir：指定文件对话框的初始目录。如果该属性没有指定，则使用当前目录。 例： CommonDialog1.initdir=“E:\Mp3” 文件对话框举例 综合举例 Visual Basic程序设计教学课件 掌握驱动器列表框(DriveListBox)、文件夹列表框(DirListBox)和文件列表框(FileListBox)的使用。 理解通用对话框控件（Commondialog）提供的6种对话框的使用。 了解一些常用的ActiveX控件（高级控件）的使用。 本章要求： 第13章 文件系统控件 本章重点： 本章难点： Commondialog控件 标准文件控件和Commondialog控件 VB工具箱中提供了三种标准文件控件：驱动器列表框(DriveListBox)、文件夹列表框(DirListBox)和文件列表框(FileListBox)。 这三种控件可以单独使用，也可以组合使用。下图为三种控件组合使用的情况。 驱动器列表框 文件列表框 文件夹列表框 演示文件系统控件 驱动器列表框（DriveListBox）通常只显示当前驱动器名称，单击向下箭头，就会下拉出计算机拥有的所有磁盘驱动器，供用户选择。 1.重要属性 Drive：返回或指定出现在列表框顶端的驱动器(即当前驱动器)。在设计时不可用。 使用格式：对象名.Drive [= 驱动器字符] 例如：Drive1.drive=“D:” 2．重要事件——Change事件 在程序运行时，当选择一个新的驱动器或通过代码改变Drive属性的设置时都会触发驱动器列表框的change事件发生。 文件夹列表框（DirListBox） 控件用来当前驱动器目录结构及当前目录下的所有子文件夹（子目录）。供用户选择其中一个目录为当前目录。 1.重要属性 Path：返回或设置当前路径。在设计时不可用。 使用格式：对象名.Path [= 路径字符表达式] 例如：Dir1.Path= C:\Mydir 2．重要事件——Change事件 与驱动器列表框一样，在程序运行时，每当改变当前目录，即文件夹列表框的Path属性发生变化时，都要触发其Change事件发生。 说明： Path属性也可以直接设置限定的网络路径。 如：\\网络计算机名\共享目录名\path 文件列表框（FileListBox）控件用来显示 Path 属性指定的目录中的文件。 1．常用属性 （1）Path：用于返回和设置文件列表框当前目录，设计时不可用。说明：当Path值的改变时，会引发一个PathChange事件。 例如：File1.Path=Dir1.path （2）Filename：用于返回或设置被选定文件