vb.net 通过WMI读取显示器名称

在VB.NET中，你可以使用Windows Management Instrumentation (WMI) 来访问系统信息，包括显示器名称。WMI提供了一种标准的方式来管理和操作计算机上的各种资源。以下是基本步骤：

1. 首先，你需要添加 `System.Management` 和 `System.Runtime.InteropServices`命名空间，这两个库包含了处理WMI的类和方法。

Imports System.Management
Imports System.Runtime.InteropServices

2. 创建一个名为 `GetMonitorNames` 的方法，通过 `ManagementObjectSearcher` 来查询WMI，查找 "Win32_DesktopMonitor" 类型的对象，这个类代表了桌面监视器设备。

Private Function GetMonitorNames() As List(Of String)
    Dim searcher As New ManagementObjectSearcher("SELECT Name FROM Win32_DesktopMonitor")
    Dim monitors As New List(Of String)

    For Each monitor In searcher.Get()
        monitors.Add(CType(monitor("Name"), String))
    Next

    Return monitors
End Function

3. 调用这个函数，它会返回一个包含所有显示器名称的列表。

Dim displayNames = GetMonitorNames()
For Each name In displayNames
    Console.WriteLine(name) ' 打印显示器名称
Next