Como saber las unidades logicas que corresponden a una conexion de Red

Atendiendo a la consulta de Cesar, os dejo un fragmento de código, explicando cómo enumerar las unidades que corresponden a conexiones de Red. De hecho es una variacion del anterior post ‘Enumerar las unidades logicas de nuestros discos’.

Sub Main() Handles MyBase.Load
    ‘ Obtener todas las unidades logicas de mi equipo
    Dim MisUnidades = From Unidad In My.Computer.FileSystem.Drives _
      Select Unidad.Name
    ‘ Componer la informacion que visualizare de mis unidades
    ‘ que correspondan a conexiones de red.
    Dim InfoUnidad = From info In MisUnidades _
       Where My.Computer.FileSystem.GetDriveInfo(info).DriveType = IO.DriveType.Network _
       Select Unidad = My.Computer.FileSystem.GetDriveInfo(info).Name, _
       Tipo = My.Computer.FileSystem.GetDriveInfo(info).DriveType

    Dim miVista As New DataGridView
    miVista.Dock = DockStyle.Fill
    Me.Controls.Add(miVista)
    miVista.DataSource = InfoUnidad.ToList
End Sub

Este es el resultado