VB上位机如何获取一个字节的每个位是0还是1

  • 学习7759次

在单片机配合上位机的工程项目中,经常需要用到字节的每个位。如题,上位机如何获取一个字节的每个位是0还是1?这里有一种方法,透露给大家。我们知道,一个字节是8个位,每个位不是0就是1。

例如,单片机控制8个继电器,用一个字节的8个位的0和1来表示继电器的开和关,1表示断开,0表示吸合,即0000 0100就代表第3个继电器断开。单片机通过串口发送一个字节给上位机,那么上位机如何知道每个位是0还是1呢?

这里以VB程序为例,其它上位机软件算法是通用的。

Dim a As Byte ? ?'定义一个字节a
Dim buf(7) As Byte ?'定义一个数组,共8个字节
用a获取到需要拆分位的字节
For I = 7 To 0 Step -1  'I从7到0,递减
If a / (2 ^ I) >= 1 Then '如果a除以2的I次方大于等于1,那么
buf(I) = 1 'buf数组的第I个字节就等于1
a = a - 2 ^ I '重新计算a
Else '如果a除以2的I次方小于1,那么
buf(I) = 0 'buf数组的第I个字节就等于0
End If '结束if语句
Next I '下一个I

执行完程序以后,buf[0]就是字节a的位0,buf[1]就是字节a的位1,以此类推。你现在可以带进去一个数验证一下。

发表评论