要顯示的檔案型態( 過濾方式),如:*.* 或*.txt ...... 來源、目的: 字串覆蓋模式: boolean ,預設值為true來源、目的可用* 與? 若CDROM 沒有光碟片,也會回傳true。 要用Drive 物件的IsReady來偵測. Dim fs As New FileSystemObject Private Sub Drive1_Change() Dim drv As Drive Set drv = fs.GetDrive(Drive1.Drive) If (Not drv.IsRea