本文介绍了以编程方式获取友好的端口名称的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
这里的每个人都有一个想法,我可以在我的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应该可以.
更多推荐
以编程方式获取友好的端口名称
发布评论