Environment.GetLogicalDrives returns the logical drives on the current computer.
Imports System
Class Sample
Public Shared Sub Main()
Dim drives As [String]() = Environment.GetLogicalDrives()
Console.WriteLine("GetLogicalDrives: {0}", [String].Join(", ", drives))
End Sub 'Main
End Class 'Sample