產學研中心課件

1、VB6程序設計第六部分VB中的圖形處理及文件操作產學研中心教學目標：1.掌握：文件控件和文件操作 2.理解：文件類型及結構教學內容：利用文件控件處理文件的方法、文件處理函數、文件系統對象(FileSystemObject)編程。 在計算系統中，文件管理一直是一個非常重要的概念。所謂的文件是指存放在外部存儲介質上的數據和程序等.利用文件控件 在VB6.0中包括四個文件類型控件，它們分別是DriveListBox控件、DirListBox控件、FileListBox控件和CommDialog控件，可以實現不同功能。 1.設置初始窗體屬性屬性設置(name)form1borderstyle3-fix

2、ed dialogcaptionform1enabledtrueheight3600left0maxbuttonfalseminbuttonfalsemoveablefalsepicture(none)startupposition2-centerscreentop0visibletruewidth5670windowstate0-normal窗體屬性設置3.編寫程序的初始化代碼 在窗體的設計階段雙擊窗體，在窗體的form_load（）事件中添加下列代碼：Private Sub Form_load()Drive1.enabled=true Dir1.enabled=trueFile1.enab

3、led=true 設置控件的有效狀態(tài)File1.pattern=*.exe設置過濾器，使之只顯示可執(zhí)行文件Drive1.drive=c: 設置控件的初始驅動器為C盤End Sub程序說明： 程序首先通過Drive1.enabled=true，Dir1.enabled=true，File1.enabled=true來設置控件的有效狀態(tài)，然后設置文件的過濾器為.exe和控件的初始驅動器為c:，這樣只有在c盤下面的以.exe結尾的可執(zhí)行文件才能夠顯示出來。4.響應DriveListBox控件的Change事件Private Sub Drive1_change()Dir1.path=Drive1.Dr

4、ive 改變驅動器，使目錄列表框中的內容跟著所選驅動器的變化而變化End Sub程序說明： 在程序的運行階段，改變驅動器時，就會激活DriveListBox控件的Drive1_Change()事件，然后通過Dir1.path=Drive1.Drive來使DriveListBox控件顯示改變驅動器后的目錄。VB6.0的文件處理函數在VB6.0中，除了可以利用文件控件來對文件進行處理外，還可以通過一些函數和方法來處理文件，常用的文件處理函數和方法有Kill,FileCopy.RmDir,Shell和Name等。 Kill語句的功能是從磁盤中刪除文件，它的語法結構如下：Kill pathname其中

5、參數pathname是用來指定一個文件名的字符串表達式，pathname要包含文件所在的目錄或文件夾以及驅動器。Kill支持多字符（）和單字符（？）的統配來指定多重文件。FileCopy語句的功能是復制一個文件 ，它的語法結構如下 FileCopy source,destination在FileCopy語句的語法中包括兩個參數，其中soure用來表示要被復制的源文件名，而destination用來指定要復制的目的文件名在source和destination參數中都要包含文件所在的目錄或文件夾以及驅動器。Shell函數的功能是執(zhí)行一個可執(zhí)行文件，同時返回一個Variant(Double),如果成

6、功的話，代表這個程序的任務ID,若不成功，則會返回0.它的語法結構如下：Shell(pathname,windowstyle）參數說明： pathname為所要執(zhí)行的應用程序的名稱及其路徑和必要的參數；RmDir 語句的功能是刪除一個存在的而且為空的目錄或文件夾，它的語法結構如下所示：Rmdir path其中參數Path是一個字符串表達式，用來指定要刪除的目錄或文件夾。如果在參數Path中沒有指定驅動器，則Rmdir會在當前驅動器上刪除為空的目錄或文件夾。Name語句的功能是重新命名一個文件、目錄或文件夾，它的語法結構如下： Name oldpathname As newpathname其中包括以下兩個部分：oldpat