这是我们公司软件中关于电子秤接口中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

对不起，以上问题原来有误！这是一段上个世纪写的代码,今天发现，testbit()是一个命名不规范的自定义函数。此问题已结贴！谢谢！