Imports System
Imports System.IO
Public Class MainClass
Shared Sub Main()
For Each drive_info As DriveInfo In DriveInfo.GetDrives()
Console.Write(drive_info.Name & " " )
Console.WriteLine(drive_info.RootDirectory.ToString)
If drive_info.IsReady() Then
Console.WriteLine( drive_info.DriveFormat())
End If
Next drive_info
End Sub
End Class