使用 沁恒编写的“模块调试”能找出COM4 但是使用VB的模块无法找到CH341的COM4
CH341PtNameIsCH341("COM4")返回值为False,这是怎么回事呢?
有没有比较完成VB程序下载呢?
使用 沁恒编写的“模块调试”能找出COM4 但是使用VB的模块无法找到CH341的COM4
CH341PtNameIsCH341("COM4")返回值为False,这是怎么回事呢?
有没有比较完成VB程序下载呢?
暂时没有VB程序下载.判断CH341串口有两种方法, 1,在CH341串口关闭时,可以用CH341PtNameIsCH341()判断指定的串口名(COMXX)是不是CH341串口的.(注意串口名中不能有空格) 2,CH341串口打开时,可以用CH341PtHandleIsCH341()判断串口句柄是不是CH341串口的
CH341PtNameIsCH341("COM4")没有空格呀,就是返回不了True,但奇怪的是沁恒编写的“模块调试”能找出COM4来。
你可以用一个循环来找查找: Dim porthandle As Long Dim i As Byte Dim portname As String Dim fullportname As String For j = 1 To 21 portname = "COM" + Trim(Str(j)) + Trim(Chr(0)) '设备名 fullportname = "\\.\" & portname '完整的设备名,可以查找大于COM9的串口 If (CH341PtNameIsCH341(fullportname) <> False) Then showinfo.AddItem portname '提示发现CH341串口 End If Next j 你用这段代码试试.
ls,谢谢您。。