VB中怎样实现位运算？

Question

AND、XOR、OR等可以实现逻辑运算也可以实现位运算

Answer 1

dim a as long
a = 1
a = a * 2        'a <<= 1;
a = a \ 2        'a >>= 1;
...

Answer 2

左移n位 = num * 2^n
右移n位 = num \ 2^n建立一个数组查表比较快

Answer 3

位运算基本要靠自己写了。上面已经有了位移的方法
这里说说也比较常用的测试第n位的值，和第n位置位的方法：测试位=iif((num and 2^n)>0,1,0)置位：
 置0: num=num and (&hff-2^n)
 置1: num=num or 2^n建议：把常用的写成通用的函数库，方便自己日后凋用