VB上位机串口 显示问题
以下程序都是看论坛网友的程序自己水平太烂可能用的方法不对大家指点单片机发送来的数据 上位机只能显示ASC 码 大概程序如下
Dim comstr As String
comstr = MSComm1.Input ’ 接收串口发送过来的数据
Text1.Text = Asc(comstr & Chr(32)) ’ 转换后 显示是十进制 但是数据超过128 就显示不对 而且无数据的时候显示32 为空格符号
后来改为接受2进制程序
Dim inbyte() As Byte
Dim buf As String
buf = ""
inbyte = MSComm1.Input
For i = LBound(inbyte) To UBound(inbyte)
buf = buf + Hex(inbyte(i))
Next i
Text1.Text = buf
可以接收255以内的数据 超过了 就不能正常显示 单片机发送450 接收到显示的只能是C2应该是1C2
我的目的是 接收单片机发送来的数据 以十进制 显示 数据范围在200~1000
以上两个程序 都在定时器中
头大了第一次发帖兴奋ING小菜鸟 http://www.xiao-qi.com/netfile/Mscomm.html
页:
[1]