如何从 Byte 转换为 BitArray

bobyang520 2011-07-29 01:31:02
现有一字节数组
dim Status(29) as byte

现在希望读取数组元素的某个位的值

请教大家应该如何实现?

我想到的是:因为 BitArray 使用 Get 方法 返回具体某位的值,但就是不知道用什么样的方法能将字节数组转成位数组


...全文
664 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
cosmo_sei 2011-08-01
  • 打赏
  • 举报
回复
位运算是性能最高的,BitArray应该也是用位运算处理的,其实还是一种方法。
bobyang520 2011-07-31
  • 打赏
  • 举报
回复
Dim b As Byte
b = &H2
Dim b1(0) As Byte
b1(0) = b
Dim ba As New BitArray(b1)
TextBox1.Text = ba.Get(0) ‘值为 False
TextBox2.Text = ba.Get(1) '值为 True


此方法可以将 Byte 数组,转为 BitArray ,然后利用 Get 方法获取某位的值(1 或 0)

对 Byte 数据某位上的值操作,也可采用 位运算

比如:If (b And &H1) = &H1 ’判断最低位是否为 1


我就找到了这两种方法,不知大家是否还有其他更好的,抛砖引玉中……

16,549

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧