返回一個描述指定驅動器的類型的值。
object.DriveType
object 應為 Drive 對象的名稱。
以下代碼舉例說明如何使用 DriveType 屬性:
Function ShowDriveType(drvpath) Dim fso, d, t Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(drvpath) Select Case d.DriveType Case 0: t = "未知"Case 1: t = "可移動"Case 2: t = "固定"Case 3: t = "網絡"Case 4: t = "CD-ROM"Case 5: t = "RAM磁盤"End SelectShowDriveType = "驅動器" & d.DriveLetter & ": - " & tEnd Function
新聞熱點
疑難解答
圖片精選