《VB串口上位机程序源代码》由会员分享，可在线阅读，更多相关《VB串口上位机程序源代码（1页珍藏版）》请在装配图网上搜索。
1、Private Sub Form_Load()MSComm1.Settings = 9600,N,8,1 波特率 9600bit/s ，无校验， 8 位数据， 1位停止位MSComm1.CommPort = 1设定串口， 1为coml,这里请选择对应的 com序号MSComm1.InBufferSize = 8MSComm1.OutBufferSize = 2设置返回接收缓冲区的大小，以字符为单位1If MSComm1.PortOpen = True Then MSComm1.PortOpen = False 关串口MSComm1.RThreshold = 4设置并返回产生 oncomm 事件
2、的字符数，以字符为单位 RThresholdOnComm 事件 为 1 ，接收缓冲区收到每一个字符都会使MSComm 控件产生MSComm1.SThreshold = 1MSComm1.InputLen = 0设置从接收缓冲区读取的字符，为0 读取整个缓冲区MSComm1.InputMode = comInputModeText 发文本方度接收If MSComm1.PortOpen = False Then MSComm1.PortOpen = TrueMSComm1.InBufferCount = 0 清除接收缓冲区Me.Caption = 温度 Text1.Text = 00.0End SubPrivate Sub MSComm1_OnComm()Dim rec As StringSelect Case MSComm1.CommEventCase comEvReceiverec = MSComm1.InputText1.Text = recMSComm1.InBufferCount = 0 清空接收缓冲区End SelectEnd Sub
VB串口上位机程序源代码
