vb.net 教程 4-1 获取磁盘驱动器信息 DriveInfo

概述.Net对文件的 *** 作主要通过System.Io命名空间进行的，包括驱动器、文件夹、文件信息的获取、简单 *** 作，以及文件和数据流的读写等。 在本章教程中需要引用System.Io，请在窗体的所有代码之前，例如Form1窗体的代码 Public Class Form1 之前加上 Imports System.IO 磁盘驱动器（我觉得叫做磁盘分区更合适）信息可以通过System.Io命名空间下面的Driv .Net对文件的 *** 作主要通过System.Io命名空间进行的，包括驱动器、文件夹、文件信息的获取、简单 *** 作，以及文件和数据流的读写等。 在本章教程中需要引用System.Io，请在窗体的所有代码之前，例如Form1窗体的代码 Public Class Form1 之前加上 imports System.IO
磁盘驱动器（我觉得叫做磁盘分区更合适）信息可以通过System.Io命名空间下面的DriveInfo类来获得。
DriveInfo提供了如下属性： name：获取驱动器的名称，如 C:\。
DriveFormat：获取磁盘分区文件系统的名称，例如 NTFS、fat32等。
DriveType：获取驱动器类型，包括CDRom（光驱）， Fixed（固定磁盘）， Network（网络设备）， norootDirectory， Ram（随机存取存储器）， Removable（可移动设备），或UnkNown（未知设备）。
注意：移动硬盘会识别为Fixed，优盘识别为Removable，以后有机会我将讲解如何正确识别移动硬盘。
IsReady：指示分区是否已准备就绪可以读写。
VolumeLabel 获取或设置驱动器的卷标。
RootDirectory 获取驱动器的根目录。
TotalSize：获取该分区上存储空间的总大小（以字节为单位）。
TotalFreeSpace：获取该分区上的可用空闲空间总量（以字节为单位）。
AvailableFreeSpace：获取该分区上的可用空闲空间总量（以字节为单位）。
注意：AvailableFreeSpace不同于TotalFreeSpace，AvailableFreeSpace是当前账号的可用的空闲磁盘配额。
以及一个重要方法： GetDrives()： 检索计算机上的所有逻辑驱动器的驱动器，返回DriveInfo数组 注意：此方法是静态方法，不用定义实例即可使用。
以下来看看如何使用DriveInfo： 设计图示如下：
当载入窗体时，将电脑上的所有分区的名称加入cbDriver：

    Private Sub Form1_Load(sender As Object,e As EventArgs) Handles MyBase.Load        For Each drive As DriveInfo In DriveInfo.GetDrives            cbDriver.Items.Add(drive.name)        Next    End Sub

当点击并选择了cbDriver中某一项时，在文本框中显示该分区的信息：

    Private Sub cbDriver_SelectedindexChanged(sender As Object,e As EventArgs) Handles cbDriver.SelectedindexChanged        Dim drive As DriveInfo        drive = New DriveInfo(cbDriver.Text)        txtDriveInfo.Text = ""        If drive.IsReady Then            txtDriveInfo.Text = ""            txtDriveInfo.Text &= "选择盘符：" & drive.name & ControlChars.CrLf            txtDriveInfo.Text &= "卷标名称：" & drive.VolumeLabel & ControlChars.CrLf            txtDriveInfo.Text &= "分区类型：" & getDriveType(drive.DriveType) & ControlChars.CrLf            txtDriveInfo.Text &= "分区大小：" & Math.Round(drive.TotalSize / 1024 / 1024 / 1024,2,MIDpointRounding.AwayFromZero) & "GB" & ControlChars.CrLf            txtDriveInfo.Text &= "剩余空间：" & Math.Round(drive.TotalFreeSpace / 1024 / 1024 / 1024,MIDpointRounding.AwayFromZero) & "GB" & ControlChars.CrLf            txtDriveInfo.Text &= "选择盘符：" & Math.Round(drive.AvailableFreeSpace / 1024 / 1024 / 1024,MIDpointRounding.AwayFromZero) & "GB" & ControlChars.CrLf            txtDriveInfo.Text &= "文件系统：" & drive.DriveFormat & ControlChars.CrLf        Else            txtDriveInfo.Text = ""            txtDriveInfo.Text &= "选择盘符：" & drive.name & ControlChars.CrLf            txtDriveInfo.Text &= "不可用。"        End If    End Sub    Private Function getDriveType(ByVal drive_type As DriveType) As String        Select Case drive_type            Case DriveType.CDRom                Return "光驱"            Case DriveType.Fixed                Return "固定磁盘"            Case DriveType.Network                Return "网络设备"            Case DriveType.Removable                Return "可移动盘"            Case Else                Return "其它"        End Select    End Function

getDriveType方法是用来获得分区类型的。 运行时如下：
学习更多vb.net知识，请参看 vb.net 教程 目录 总结

以上是内存溢出为你收集整理的vb.net 教程 4-1 获取磁盘驱动器信息 DriveInfo全部内容，希望文章能够帮你解决vb.net 教程 4-1 获取磁盘驱动器信息 DriveInfo所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。