以编程方式获取友好的端口名称 [英] 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屋!
查看全文