VB.Net by API/System.IO/DriveInfo — различия между версиями
Admin (обсуждение | вклад) м (1 версия) |
|
(нет различий)
|
Версия 19:40, 26 мая 2010
Содержание
DriveInfo.AvailableFreeSpace()
<source lang="vbnet"> 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.AvailableFreeSpace().ToString) End If Next drive_info End Sub
End Class
</source>
DriveInfo.DriveFormat()
<source lang="vbnet"> 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
</source>
DriveInfo.DriveType()
<source lang="vbnet"> 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.DriveType().ToString) Next drive_info End Sub
End Class
</source>
DriveInfo.GetDrives()
<source lang="vbnet"> Imports System Imports System.IO
Public Class MainClass
Shared Sub Main() For Each drive_info As DriveInfo In DriveInfo.GetDrives() Console.WriteLine(drive_info.Name) Next drive_info End Sub
End Class
</source>
DriveInfo.IsReady()
<source lang="vbnet"> 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.IsReady().ToString) Next drive_info End Sub
End Class
</source>
DriveInfo.Name
<source lang="vbnet"> Imports System Imports System.IO
Public Class MainClass
Shared Sub Main() For Each drive_info As DriveInfo In DriveInfo.GetDrives() Console.WriteLine(drive_info.Name) Next drive_info End Sub
End Class
</source>
DriveInfo.RootDirectory
<source lang="vbnet"> 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) Next drive_info End Sub
End Class
</source>
DriveInfo.TotalFreeSpace()
<source lang="vbnet"> 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
</source>
DriveInfo.VolumeLabel()
<source lang="vbnet"> 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.VolumeLabel()) End If Next drive_info End Sub
End Class
</source>