产学研中心.pptVIP

* * * ★产学研中心 教学目标：　1.掌握：文件控件和文件操作 2.理解：文件类型及结构 教学内容：利用文件控件处理文件的方法、文件处理函数、文件系统对象(FileSystemObject)编程。 在计算系统中，文件管理一直是一个非常重要的概念。所谓的文件是指存放在外部存储介质上的数据和程序等. 　　 利用文件控件 　在VB6.0中包括四个文件类型控件，它们分别是DriveListBox控件、DirListBox控件、FileListBox控件和CommDialog控件，可以实现不同功能。 1.设置初始窗体属性 属性 设置 (name) form1 borderstyle 3-fixed dialog caption form1 enabled true height 3600 left 0 maxbutton false minbutton false moveable false picture (none) startupposition 2-centerscreen top 0 visible true width 5670 windowstate 0-normal 窗体属性设置 2.添加控件，设置其属性 　 　　向窗体添加一个drivelistbox控件，一个dirlistbox控件 一个filelistbox控件，它们将实现相应不同的功能，同时它们又相互协调。 　　如图 　　 ????????????????????????????????????????????? 3.编写程序的初始化代码 　　在窗体的设计阶段双击窗体，在窗体的form_load（）事件中添加下列代码： Private Sub Form_load() Drive1.enabled=true 　 Dir1.enabled=true File1.enabled=true 　　设置控件的有效状态 File1.pattern=*.exe　设置过滤器，使之只显示可执行文件 Drive1.drive=c:\ 　　设置控件的初始驱动器为C盘 End Sub 　　程序说明： 程序首先通过Drive1.enabled=true，Dir1.enabled=true，File1.enabled=true来设置控件的有效状态，然后设置文件的过滤器为＊.exe和控件的初始驱动器为c:\，这样只有在c盘下面的以＊.exe结尾的可执行文件才能够显示出来。 4.响应DriveListBox控件的Change事件 Private Sub Drive1_change() Dir1.path=Drive1.Drive 改变驱动器，使目录列表框中的内容跟着所选驱动器的变化而变化 End Sub 　　程序说明： 在程序的运行阶段，改变驱动器时，就会激活DriveListBox控件的Drive1_Change()事件，然后通过Dir1.path=Drive1.Drive来使DriveListBox控件显示改变驱动器后的目录。 5.响应DirListBox控件的Change事件 Private Sub Dir1_change() File1.path=Dir1.path 改变目录，使目录列表框中的内容跟着所选文件夹的不同而不同 End Sub 　　程序说明： 在程序的运行阶段，改变目录时，就会激活DirListBox控件的Dir1_change()事件，然后通过File1.path=Dir1.path来使FileListBox控件显示改变目录后的文件列表。 存储文件，运行程序 VB6.0的文件处理函数 在VB6.0中，除了可以利用文件控件来对文件进行处理外，还可以通过一些函数和方法来处理文件，常用的文件处理函数和方法有Kill,FileCopy.RmDir,Shell和Name等。 Kill语句的功能是从磁盘中删除文件，它的语法结构如下： 　　Kill pathname 　　其中参数pathname是用来指定一个文件名的字符串表达式，pathname要包含文件所在的目录或文件夹以及驱动器。Kill支持多字符（＊）和单字符（？）的统配来指定多重文件。 FileCopy语句的功能是复制一个文件 ，它的语法结构如下 FileCopy source,destination 　　在FileCopy语句的语法中包括两个参数，其中soure用来表示要被复制的源文件名，而destination用来指定要复制的目的文件名 　　在source和destination参数中都要包含文件所在的目录或文件夹以及驱动器。 　Shell函数的功能是执行一个可执行文件，同时返回一个Varia