返回列表 上一主題 發帖

如何停止屏幕閃動

回復 1# ikboy
如果是要取得磁碟標籤名稱和磁碟序號,可試試不同方法
  1. Sub Test()
  2.     Dim oFS As Object, oDrive As Object
  3.     Set oFS = CreateObject("Scripting.FileSystemObject")
  4.     Set oDrive = oFS.drives("D")
  5.    
  6.     Debug.Print "標籤: " & oDrive.VolumeName
  7.     Debug.Print "序號: " & Hex(oDrive.SerialNumber)
  8. End Sub
複製代碼
表達不清、題意不明確、沒附檔案格式、沒有討論問題的態度~~~~~~以上愛莫能助。

TOP

        靜思自在 : 唯其尊重自己的人,才更勇於縮小自己。
返回列表 上一主題