主题:菜鸟小问题,请帮个忙.
Private Sub Command1_Click()
MSComm1.CommPort = 1
MSComm1.Settings = "9600,n,8,1" '参数设置
If MSComm1.PortOpen = False Then
MSComm1.PortOpen = True
End If '通信连接端口状态,并打开通信端口
MSComm1.RThreshold = 1 '当接受寄存器达到1个字符时,引发OnComm事件中的接收事件
MSComm1.InputLen = 1 '一次读入输入缓冲区中1个数据
'MSComm1.InputMode = 1 '数据通过input属性以二进制形式取回
'MSComm1.InBufferSize = 4000 '数据接受缓冲区大小为4000字节
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0 '清空接收/输出寄存器
End Sub
我是刚学VB的菜鸟,请问这个程序为什么不能设置缓冲区大小和数据取回方式?
MSComm1.CommPort = 1
MSComm1.Settings = "9600,n,8,1" '参数设置
If MSComm1.PortOpen = False Then
MSComm1.PortOpen = True
End If '通信连接端口状态,并打开通信端口
MSComm1.RThreshold = 1 '当接受寄存器达到1个字符时,引发OnComm事件中的接收事件
MSComm1.InputLen = 1 '一次读入输入缓冲区中1个数据
'MSComm1.InputMode = 1 '数据通过input属性以二进制形式取回
'MSComm1.InBufferSize = 4000 '数据接受缓冲区大小为4000字节
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0 '清空接收/输出寄存器
End Sub
我是刚学VB的菜鸟,请问这个程序为什么不能设置缓冲区大小和数据取回方式?