用什么方法可以检测到Pc的串口号

Question

我现在装了个双串口卡，我在我的电脑属性里看到它的端口号是3、和4.还有电脑本身带一个串口1，我在vb里怎么才能读到这几个串口的号？？？？

Answer 1

Option Explicit
    Dim a As Integer
Private Sub Form_Load()
    Me.AutoRedraw = True
    On Error GoTo uerror
    For a = 1 To 16
        MSComm1.CommPort = a
        MSComm1.PortOpen = True
        If MSComm1.PortOpen = True Then
            Print "可用Com号= "; a
            MSComm1.PortOpen = False
        Else
        End If
    Next
    Exit Sub
uerror:
    Print "出错或占用Com号= "; a
    Resume Next
End Sub

Answer 2

可能是由于你的注册表的原因，把你的串口编号改乱了，你可以将其修改为COM1啊。

Answer 3

你可以用API函数来检查，CreateFile来依次打开COM1~COM4，看看他的返回，如果返回小于等于零，那么这个串口就不存在，如果返回值大于0，这个串口就存在。我的资源里有相关的代码。你可以下载来借鉴一下。

Answer 4

我也有这个问题，只不过我想用JAVA读，求解……