12 2012 档案

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 北冥子 阅读(2283) 评论(0) 推荐(0)