VB.NET 通过WMI 查询显示器型号输出到TEXTBOX

在VB.NET中，你可以使用Windows Management Instrumentation (WMI) 来查询系统信息，包括显示器型号。下面是一个简单的示例代码片段，演示如何连接到WMI服务，查询显示器信息并将其显示在TextBox中：

Imports System.Management

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    ' 创建WMI对象
    Dim query As New SelectQuery("SELECT Name FROM Win32_DisplayDevice")

    ' 连接到本地计算机的WMI服务
    Using searcher As New ManagementObjectSearcher("root\\cimv2", query)
        For Each device In searcher.Get()
            ' 获取显示器型号并填充到TextBox
            TextBox1.Text = "显示器型号：" & device.Properties("Name").Value.ToString()
        Next
    End Using
End Sub

在这个例子中，当用户点击按钮时，会运行这个查询并获取显示器的名称属性。注意，你需要在实际应用中处理异常，并确保引用了`System.Management`命名空间。