控制項

屬 性

方法

說明

磁碟清單

Drive

Drive1.drive="D:"

改變顯示清的磁碟為D

目錄清單

Path

Dir1.Path="C:\window"

改變顯示目錄為C:\window

檔案清單

Pattern

File.Pattern="*.EXE"

設定檔案清單只顯示EXE類別的檔案

FileName記錄選取檔案的檔名

B$=File1.FileName

選取檔案的檔名記錄到B

物件

屬性

屬性值

Text1（文字方塊）

Caption

清為空白

Enable

False

Drive1（磁碟清單）

Dir1（目錄清單）

File1（檔案清單）

Private Sub Dir1_Change()
File1.Path = Dir1.Path '讓【目錄清單】的內容隨著【磁碟清單】的改變而改變
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive '讓【檔案清單】的內容隨著【目錄清單】的改變而改變
End Sub

Private Sub File1_Click()
Text1.Text = Dir1.Path & File1.FileName
'在【文字方塊】中顯示選取檔案的'磁碟、路徑、名稱
End Sub