给你一段设置程序看看
MSComm1.CommPort = 2 '使用COM1
MSComm1.Settings = "1200,N,8,1" '设置通信口参数"
MSComm1.InputLen = 1 '设置Input 一次从接收缓冲读取字节数为1
MSComm1.InBufferSize = 1256 '设置MSComm1接收缓冲区为1024字节
MSComm1.OutBufferSize = 512 '设置MSComm1发送缓冲区为2字节
MSComm1.NullDiscard = False
If MSComm1.PortOpen = False Then
MSComm1.PortOpen = True '打开通信口
End If
MSComm1.InputMode = comInputModeBinary '设置接收数据模式为二进制形式
MSComm1.SThreshold = 1 '设置Output 一次从发送缓冲读取字节数为1
MSComm1.RThreshold = 1 '设置接收一个字节产生OnComm事件
MSComm1.RTSEnable = False
发表时间:2003年9月23日14:21:52