Visual Basic 6.0 使用定义API 方法如下: 打开通信端口函数: Private Declare Function OpenComm Lib "aosong" (ByVal port As String, ByVal baudrate As Integer, ByVal databit As Integer, ByVal stopbit As Integer) As Long 关闭通信端口函数: Private Declare Function CloseComm Lib "a