假设你的控件名为mscom1
判断是否接到数据的语句为:
if mscom1.CommEvent = comEvReceive Then '如果comEvReceive为真,则数据接收到了
'传来的数值在 mscom1.input 中
text1.text= text1.text & mscom1.input
End if
提问不给分,能有多少人愿意回答啊,连个起码的鼓励都没有。
串口编程使用mscomm控件的input方法读取数据到缓冲区中。
dim inbuf
inbuf = MSComm1.Input
MSComm1.InputLen = 0