VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 1187|回复: 6

[求助] 用VB检测哪个端口接入了设备,并显示出该端口的编号?

[复制链接]
发表于 2022-2-9 21:57:53 | 显示全部楼层 |阅读模式
我在电脑上装了虚拟端口的驱动,把USB口虚拟成串口,然后在USB口插入了设备,由于电脑有3个USB端口,我想用VB检测插入设备的端口号并显示出来。怎样能用VB实现这个功能,最好有代码。谢谢
 楼主| 发表于 2022-2-10 19:30:16 | 显示全部楼层
手里有一台便携式测试仪,每次使用时都需要和笔记本电脑的USB接口(虚拟串口)连起来,然后运行测试程序,在测试程序中选择接入的端口。每次使用时都要去查一下接到了哪个端口。电脑上装了虚拟端口的驱动,把USB口虚拟成串口,由于电脑有3个USB端口,我想用VB检测插入设备的端口号并显示出来,这样就可以在测试软件中直接选择该端口了,不用再去查是哪个端口了。怎样能用VB实现这个功能?
回复 支持 反对

使用道具 举报

发表于 2022-2-11 22:24:33 | 显示全部楼层
USB设备监测插入及安全弹出示例.rar (19.22 KB, 下载次数: 189)
回复 支持 反对

使用道具 举报

 楼主| 发表于 2022-2-13 19:17:47 | 显示全部楼层

谢谢给的例子。提示 对象库未注册。 怎么解决?不能运行
回复 支持 反对

使用道具 举报

发表于 2022-2-13 22:18:25 | 显示全部楼层
检测Com端口要调用setupapi.dll里的API,上面的示例里有部分setupapi.dll的函数,不过需要改动,或者参考网上的类似示例,得到Com端口
回复 支持 反对

使用道具 举报

发表于 2022-2-17 15:07:06 | 显示全部楼层
For i = 1 To 16
      MSComm1.CommPort = i
      On Error Resume Next
      MSComm1.PortOpen = True
      If MSComm1.PortOpen = True Then
            Combo1.Text = "Com" & i
             MSComm1.PortOpen = False
      End If
Next
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2022-7-2 22:58

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表