'Imports System
'Imports System.IO
'Imports System.Runtime.InteropServices
Private Function GetDriveType(ByVal DriveLetter As Char) As DriveType
Return CType(GetDriveType(String.Format("{0}:\", DriveLetter)), DriveType)
End Function
<DllImport("kernel32")> _
Private Function GetDriveType(ByVal lpRootPathName As String) As Integer
End Function