在vb.net中安装多个窗口时获取驱动器

时间:2016-02-16 09:27:04

标签: vb.net visual-studio

所以这是我的问题。我正在处理文件传输代码之类的东西,现在我想列出安装了Windows的驱动器。 所以这里是代码,我知道如果在vb中只安装了一个窗口,

Dim root As string =Path.GetPathRoot(Environment.SystemDirectory())

但是现在我想获得列表,如果在不同的驱动器上安装了多个窗口,例如C:安装了Windows 10,而在D:安装了Windows 8,那么我想要C:和D:

所以请任何人都可以帮助我。 谢谢。

1 个答案:

答案 0 :(得分:0)

这是获取电脑上所有驱动器列表的基本步骤,如果它们包含Windows目录,则会将它们添加到列表中。

Public Class Form1

    Dim DriveList() As DriveInfo = DriveInfo.GetDrives
    Dim WindowsDrives As New List(Of String)

    Private Sub GetWindowsDrives()
        WindowsDrives.Clear()
        For Each drive As DriveInfo In DriveList
            If Directory.Exists(drive.Name & "\Windows") Then
                WindowsDrives.Add(drive.Name)
            End If
        Next
    End Sub

End Class