VB基礎(chǔ)教程第二章第十四節(jié)(共15節(jié)).doc

在一個應(yīng)用程序中，對文件的處理是一個比較常用的操作，如打開文件、保存文件，等等。Visual Basic 提供了三個控件對磁盤文件夾與文件進(jìn)行顯示與操作，它們分別是：DriveListBox（磁盤列表框）控件、DirListBox（文件夾列表框）控件，以及 FileListBox（文件列表框）控件。如圖一： 圖一一、DriveListBox（磁盤列表框）控件：在工具箱面板上，DriveListBox 控件的圖標(biāo)如圖二：圖二在窗口中創(chuàng)建的磁盤列表框可以自動顯示電腦上或網(wǎng)絡(luò)上的所有磁盤驅(qū)動器，另外，還可以通過語法設(shè)置運(yùn)行時顯示的驅(qū)動器名稱，這就要用到 Drive 屬性。磁盤列表框名稱.Drive = Drive（如 C: ，或者 D：，等等）。比如，要在窗體啟動時把當(dāng)前磁盤改為 F 盤，那么：Private Sub Form_Load()Drive1.Drive = F:End Sub圖三二、DirListBox（文件夾列表框）控件：在工具箱面板上，DirListBox 控件的圖標(biāo)如圖四：圖四文件夾列表框控件可以顯示與設(shè)置文件夾的路徑，當(dāng)用戶在窗口中創(chuàng)建 DirListBox 控件時，雙擊其中的文件夾，不需進(jìn)行編程就能自動顯示下一級的文件夾，如圖五：圖五本控件的主要屬性是 Path 屬性，用來返回或設(shè)置當(dāng)前文件夾的路徑，只能在程序運(yùn)行中使用，其語法是：文件夾列表框名稱.Path = 具體的路徑比如，我們要在窗體啟動時把默認(rèn)顯示的文件夾改為 D:Mytool ，程序可以這樣寫：Private Sub Form_Load()Dir1.Path = D:MytoolEnd Sub三、FileListBox（文件列表框）控件：跟前面兩個控件一樣，本控件能夠自動顯示符合條件的文件清單。如圖六：圖六文件列表框控件主要有兩個屬性，即 Path 屬性與 FileName 屬性，前者代表文件的路徑，從顯示路徑的功能上來說，比后者更簡便一些；后者則用來返回或設(shè)置所選文件的路徑與文件名，其語法是：文件列表框名稱.FileName = 路徑比如，我們要在窗體啟動時將 E:稿件 目錄下的所有 ZIP 文件列出來，程序可以這樣寫：Private Sub Form_Load()File1.FileName = E:稿件*.zipEnd Sub結(jié)果如圖七：圖七四、三個控件的連接：上面我們就三個控件進(jìn)行了分別的學(xué)習(xí)，在程序中，它們卻是互不關(guān)連的，并不是只要在窗體中創(chuàng)建了它們，然后對某個控件（如磁盤列表框）進(jìn)行操作，其他控件就會自動顯示相應(yīng)的磁盤下的文件，這需要用程序進(jìn)行實現(xiàn)。1、將磁盤列表框的操作賦值給文件夾列表框的 Path 屬性，在磁盤列表框的 Change 事件中輸入如下代碼：Private Sub Drive1_Change()Dir1.Path = Drive1.DriveEnd Sub2、對文件夾列表框控件進(jìn)行的操作，直接影響文件列表框所顯示的內(nèi)容：