求高手详细解释。。。谢谢

Question

Function LFuncGetBitStatus(Value,Bit)
LFuncGetBitStatus = (Value And 2^Bit) = 2^Bit
End Function

Answer 1

从一个数字中抽取某一位的二进制值。
比如
Value = 47
Bit = 3
Value的二进制形式是101111
2^3就是2的3次方，8，也就是1000
Value And 2^Bit就是101111 And 1000
    101111
and 001000
----------
    001000
结果是 1000，和2^3相等。
返回True
所以47的二进制格式的第四位（从低位数）是True

Answer 2

首先 function要有返回值的类型, 比如: function sss(....) as long
这表示函数返回一个长整型
其次,从你函数内部的语句来看,LFuncGetBitStatus 返回的应该是一个布尔类型,即:true和false

Answer 3

检查一个数的某二进制位是否为 1。函数声明最好加上 As Boolean，这是一种好的编程习惯。