从地磅中读过来的字节数据该如何来进行转化(从显示结果中转化)?

Question

地磅通过串口与PC相连,协议:4800,N,8,1数据接收
dim vVar as variant
dim b() as byte()
 private sub MSC1_OnComm
    With MSC1
        Select Case .CommEvent
            Case 2
                 vVar=MSC1.Input
                 b=vVar
                 for i=0 to ubound(b)
                      txt.text=txt.text & b(i)
                 next
end sub
读出来的数据是如下格式:
2551780002551780002551730025517800下面的数据该如何分解才能得到我想要的真正数据,地磅称的数据为整数

Answer 1

dim Temp as String
private sub MSC1_OnComm
    With MSC1
        Select Case .CommEvent
            Case 2
                 temp=MSC1.Input
                 txt.text=txt.text & temp
end sub
你再看看，这样可以吗？

Answer 2

如果采用txt.text=txt.text & MSC1.Input ,那样得到的全是乱码