ytliuhaibo 发表于 2007-5-14 16:37

pb串口通信-电子秤接口中MSComm控件OnComm 事件中关于testbit()的问题

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

ytliuhaibo 发表于 2007-5-15 12:45

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

页: [1]

编程论坛