VB中的图形处理及文件操作培训教材.ppt

★产学研中心 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函数的功能是执行一个可执行文件，同时返回一个Variant(Double),如果成功的话，代表这个程序的任务ID,若不成功，则会返回0.它的语法结构如下： 　　Shell(pathname[,windowstyle]） 　　参数说明： pathname为所要执行的应用程序的名称及其路径和必要的参数； RmDir 语句的功能是删除一个存在的而且为空的目录或文件夹，它的语法结构如下所示： Rmdir path 　　其中参数Path是一个字符串表达式，用来指定要删除的目录或文件夹。如果在参数Path中没有指定驱动器，则Rmdir会在当前驱动器上删除为空的目录或文件夹。 Name语句的功能是重新