Imports System.IO Public Class Tester Public Shared Sub Main Dim StrS() As String Dim i As Integer StrS = System.IO.Directory.GetLogicalDrives() For i = 0 To StrS.Length - 1 Console.WriteLine(StrS(i)) Next i End Sub End Class
C:\ D:\