第13章文件系統(tǒng)控件-文庫(kù)吧資料
2025-07-26 07:35本頁(yè)面
【正文】 展名為 .txt和 .doc的文件： = *.frm。 = str1 End Sub 文件列表框（ FileListBox） 顯示由 Path屬性指定的目錄中的文件 ? Path屬性 , 指定路徑名 ? Pattern屬性 , 指定文件類型或模式 , 如 *.bas, a?.txt ? FileName屬性 , 設(shè)計(jì)時(shí)不可用 , 所選中文件的路徑和文件名 , 會(huì)影響 Path和 Pattern屬性 ? PathChange事件 , 路徑被 FileName或 Path屬性改變時(shí)發(fā)生 ? PatternChange事件 , 列表樣式被 FileName或 Path屬性改變時(shí)發(fā)生 ? Archive, Normal, System, Hidden, ReadOnly屬性 ? ListCount, ListIndex, Selected等與標(biāo)準(zhǔn)列表框相同 文件列表框的 Pattern屬性 ? 缺省時(shí)文件列表框會(huì)顯示 Path屬性指定目錄下的所有文件 ， 通過(guò)設(shè)置 Pattern屬性可以控制顯示這些文件的子集 ， 即過(guò)濾功能 。 vbCrLf amp。 vbCrLf amp。當(dāng)前驅(qū)動(dòng)器發(fā)生改變 Private Sub Drive1_Change() = End Sub 39。 驅(qū)動(dòng)器列表框： Drive1 列表框： lstAllDrive Private Sub Form_Load() Dim i As Integer For i = 0 To 1 (i) Next End Sub 目錄列表框（ DirListBox） 以根目錄開(kāi)始 , 顯示目錄的層次結(jié)構(gòu) ? Path屬性 , 設(shè)置的路徑 ? Change事件 , 選擇一個(gè)新目錄或改變 Path屬性時(shí)發(fā)生 ? ListCount, List, ListIndex等屬性 , 與標(biāo)準(zhǔn)列表使用相同 , 但 ListIndex屬性的規(guī)則不同 : ? 當(dāng)前選中的路徑 , ListIndex=1 ? 向上推 , 依次為 2, 3, 4 ….. ? 向下推 , 依次為 0, 1, 2, 3 …... 目錄列表框示例 【 例 】 窗體中顯示驅(qū)動(dòng)器列表框和目錄列表框 ，當(dāng)選擇某個(gè)驅(qū)動(dòng)器后 ， 該驅(qū)動(dòng)器的目錄列在目錄列表框中；如果選擇了某個(gè)目錄 ， 則在窗體上顯示該目錄名及其緊鄰的
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1