VB怎么取一个字节的位

1、以字节为单位进行加密处理;

2、将1个字节的8位二进制数分割成前4位与后4位两个二进制数;

3、.分别将上述两个4位二进制数转换为十进制数

4、双字节操作

5、a(i) = a(i - 1) * 2Nextdata = 58038n = 5

6、'从右往左查询data的第N位是0还是1If (data And a(n)) = a(n) Then   MsgBox "该位是1"Else   MsgBox "该位是0"End If