當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET DriveInfo.DriveType屬性代碼示例

本文整理匯總了VB.NET中System.IO.DriveInfo.DriveType屬性的典型用法代碼示例。如果您正苦於以下問題:VB.NET DriveInfo.DriveType屬性的具體用法?VB.NET DriveInfo.DriveType怎麽用?VB.NET DriveInfo.DriveType使用的例子?那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。您也可以進一步了解該屬性所在System.IO.DriveInfo的用法示例。


在下文中一共展示了DriveInfo.DriveType屬性的2個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: Test

' 導入命名空間
Imports System.IO

Class Test
    Public Shared Sub Main()
        Dim allDrives() As DriveInfo = DriveInfo.GetDrives()

        Dim d As DriveInfo
        For Each d In allDrives
            Console.WriteLine("Drive {0}", d.Name)
            Console.WriteLine("  Drive type: {0}", d.DriveType)
            If d.IsReady = True Then
                Console.WriteLine("  Volume label: {0}", d.VolumeLabel)
                Console.WriteLine("  File system: {0}", d.DriveFormat)
                Console.WriteLine( _
                    "  Available space to current user:{0, 15} bytes", _
                    d.AvailableFreeSpace)

                Console.WriteLine( _
                    "  Total available space:          {0, 15} bytes", _
                    d.TotalFreeSpace)

                Console.WriteLine( _
                    "  Total size of drive:            {0, 15} bytes ", _
                    d.TotalSize)
            End If
        Next
    End Sub
End Class
開發者ID:VB.NET開發者,項目名稱:System.IO,代碼行數:29,代碼來源:DriveInfo.DriveType

輸出:

Drive A:\
Drive type: Removable
Drive C:\
Drive type: Fixed
Volume label: 
File system: FAT32
Available space to current user:     4770430976 bytes
Total available space:               4770430976 bytes
Total size of drive:                10731683840 bytes 
Drive D:\
Drive type: Fixed
Volume label: 
File system: NTFS
Available space to current user:    15114977280 bytes
Total available space:              15114977280 bytes
Total size of drive:                25958948864 bytes 
Drive E:\
Drive type: CDRom

The actual output of this code will vary based on machine and the permissions
granted to the user executing it.

示例2: DriveInfo.DriveType()

' 導入命名空間
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
開發者ID:VB程序員,項目名稱:System.IO,代碼行數:17,代碼來源:DriveInfo.DriveType


注:本文中的System.IO.DriveInfo.DriveType屬性示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。