VB.NET 所有网络适配器MAC地址的列表,包括不活动网卡

在VB.NET中，获取所有网络适配器（包括不活动的）的MAC地址需要通过系统的网络管理功能，通常会利用`ManagementObjectSearcher`和`ManagementObject`来自WMI (Windows Management Instrumentation)。以下是一个简单的示例代码片段：

Imports System.Management

Public Function GetAllNetworkAdaptersMacAddresses() As Dictionary(Of String, String)
    Dim macAddressList As New Dictionary(Of String, String)

    ' 创建一个对象来搜索网络适配器信息
    Dim searcher As New ManagementObjectSearcher("SELECT * FROM Win32_NetworkAdapterConfiguration")

    ' 遍历查询结果
    For Each adapter In searcher.Get()
        ' 检查是否是物理网络适配器，并忽略虚拟机的网络接口
        If Not adapter("IPEnabled") = False AndAlso Not adapter("DeviceID").StartsWith("\\.\Physical", StringComparison.OrdinalIgnoreCase) Then
            ' 获取MAC地址
            Dim macAddress As String = adapter.Properties("MACAddress")(0).ToString()

            ' 添加到列表
            macAddressList.Add(adapter.Name, macAddress)
        End If
    Next

    Return macAddressList
End Function

这段代码会返回一个字典，其中键是网络适配器名称，值是对应的MAC地址。