pb串口通信-电子秤接口中MSComm控件OnComm 事件中关于testbit()的问题
这是我们公司软件中关于电子秤接口中MSComm控件OnComm 事件中的代码,程序没有问题。但是已经没有人知道testbit()函数的意思,请帮忙!谢谢!我只知道这是一个位操作函数。
long i
String s
ole_1.object.InputLen = 0
s = ole_1.object.Input
For i = 1 To Len(s)
If Asc(Mid(s, i, 1)) = 2 Then//这一句是什么意思?是不是ole_1.object.commevent=2的意思?
If testbit(Asc(Mid(s, i + 2, 1)),2) =1 Then exit//这一句是什么意思?
If testbit(Asc(Mid(s, i + 2, 1)),3) =1 Then//这一句是什么意思?
dw_1.object.mrp_rkd_mxb_x_cd[tmp_i] =dec(Mid(s, i + 5, 5))
Else
If testbit(Asc(Mid(s, i + 2, 1)),1) =1 Then
dw_1.object.mrp_rkd_mxb_x_cd[tmp_i] =-dec(Mid(s, i + 5, 5))
End If
Exit
End If
End If
Next