2012年12月4日
vb读取字节中的某一位
摘要： 双字节操作Dim a&(1 To 16), i&, data&, n&a(1) = 1For i = 2 To 16 a(i) = a(i - 1) * 2Nextdata = 58038n = 5'从右往左查询data的第N位是0还是1If (data And a(n)) = a(n) Then MsgBox "该位是1"Else MsgBox "该位是0"End If 阅读全文
posted @ 2012-12-04 15:56 北冥子 阅读(2243) 评论(0) 推荐(0) 编辑