以编程方式获取友好的端口名称 [英] GET FRIENDLY PORT NAME Programmatically

问题描述

这里的每个人都有一个想法，我可以在我的PC上找到列出的端口名称?

Anyone here has an idea where I can get the ports name listed in my PC?

通过使用以下代码:

For i As Integer = 0 To My.Computer.Ports.SerialPortNames.Count - 1
    cmbPort.Properties.Items.Add(My.Computer.Ports.SerialPortNames(i))
Next

如果有的话，我可以得到 COM26 等，但这不是我想要的.我想要获取 USB-SERIAL CH340 或 USB-SERIAL CH340(COM26)，而不是检索 COM26 .我该怎么办?

I could get COM26 and etc. if any, but that's not what I want. Instead of retrieving COM26, I want USB-SERIAL CH340 or USB-SERIAL CH340 (COM26). How could I do that?

推荐答案

尝试一下.

Public Shared Function ListFriendlyCOMPOrt() As List(Of String)

    Dim oList As New List(Of String)

    Try
        Using searcher As New ManagementObjectSearcher("root\CIMV2", "SELECT * FROM Win32_PnPEntity WHERE Caption like '%(COM26%'")
            For Each queryObj As ManagementObject In searcher.Get()
                oList.Add(CStr(queryObj("Caption")))
            Next
        End Using

        Return oList

    Catch err As ManagementException
        MessageBox.Show("An error occurred while querying for WMI data: " & err.Message)
    End Try

    Return oList

End Function

应该可以.

这篇关于以编程方式获取友好的端口名称的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！