Vb.net 在下拉列表中获取所有映射的网络驱动器

使用VB.Net是否可以在下拉列表中列出所有映射的网络目录/驱动器

---

我已经看了，但找不到任何有用的东西。

要将其添加到下拉列表：

 Private Sub TestCase1()
        Dim drive As System.IO.DriveInfo

    For Each drive In System.IO.DriveInfo.GetDrives()
        If drive.DriveType = IO.DriveType.Network Then
            DropDownList1.Items.Add(drive.Name)
        End If
    Next
End Sub

这就是我在C#中的做法：

---

Mike有一个很好的答案，我会添加一些东西，防止每次点击打开时它都会增长。很适合说…VB中的组合框

    Dim drive As System.IO.DriveInfo

If DropDownList1.Count < 1

     For Each drive In System.IO.DriveInfo.GetDrives()

         If drive.DriveType = IO.DriveType.Network Then

             DropDownList1.Items.Add(drive.Name)

         End If
     Next
End If

将驱动器变暗为System.IO.DriveInfo
如果DropDownList1.Count小于1
对于System.IO.DriveInfo.GetDrives（）中的每个驱动器
如果drive.DriveType=IO.DriveType.Network，则
DropDownList1.Items.Add（drive.Name）
如果结束
下一个
如果结束

    Dim drive As System.IO.DriveInfo

If DropDownList1.Count < 1

     For Each drive In System.IO.DriveInfo.GetDrives()

         If drive.DriveType = IO.DriveType.Network Then

             DropDownList1.Items.Add(drive.Name)

         End If
     Next
End If