我与单片机的通讯是下面这段,你可以简化下。不对的就得请大虾指教了
程序代码:     = "3"                                                         ' 设定端口
    MSComm.Settings = "9600,n,8,1"                                               ' 设置波特率,无校验,8位数据位,1位停止位
    MSComm.InBufferSize = 1024                                                  ' 设置接收缓冲区为1024字节
    MSComm.OutBufferSize = 4096                                                 ' 设置发送缓冲区为4096字节
    MSComm.InputMode = comInputModeBinary                                      '采用二进制传输
    MSComm.InBufferCount = 0                                                    ' 清空输入缓冲区
    MSComm.OutBufferCount = 0                                                   ' 清空输出缓冲区
    MSComm.SThreshold = 1                                                       ' 发送缓冲区空触发发送事件
    MSComm.RThreshold = 1                                                       ' 每X个字符到接收缓冲区引起触发接收事件
    MSComm.OutBufferCount = 0                                                   ' 清空发送缓冲区
    MSComm.InBufferCount = 0                                                    ' 滑空接收缓冲
    MSComm.SThreshold = 0 '一旦发送数据就触发OnComm()事件来检测是否返回数据
    MSComm.RThreshold = 1 '接收到1个字节数据就立即触发OnComm()事件
    MSComm.PortOpen = True 										
					
	


											
	    

	
											

