17,740
社区成员
发帖
与我相关
我的任务
分享如可判断一个8进制数的第几位是0还是1？
如可判断一个8进制数的第几位是0还是1？
例如：二进制数11001101 判断他的第2为为0，第三位为1，第四位为1？
用vb.net如何写代码呢？
例如：二进制数11001101 判断他的第2为为0，第三位为1，第四位为1？
用vb.net如何写代码呢？
...全文
请发表友善的回复…
发表回复
wangxin5576 2009-08-29
- 打赏
- 举报
谢谢
vbfool 2009-08-21
- 打赏
- 举报
最简单方法，是与操作法。
比如你想判断00110011第5位的值，那么就用他和00010000做 And 逻辑运算，如果得出来的是0，那就代表这位置是0，反之为1。
函数：
大概应该是这样吧。
比如你想判断00110011第5位的值，那么就用他和00010000做 And 逻辑运算，如果得出来的是0，那就代表这位置是0，反之为1。
函数：
Public Function XXX(src As Byte,Location As Integer) As Integer
Dim Value As Integer
Dim l as Byte = (2 ^ Location)
Value = (src And l)
Return IIF(Value=0,0,1) '如果得出来的结果是反的，那就是这里后2个参数颠倒了
End Function
大概应该是这样吧。
