Mega Code Archive

 

Categories / VB.Net by API / System IO

 

DriveInfo TotalFreeSpace()

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.TotalFreeSpace().ToString)             End If         Next drive_info    End Sub  End Class