Сборка из сообщений сайта и Справки Bascom.

' =======================================
' Работа с группами битов и байтами
' ---------------------------------------------------------------
' Обмен значений тетрад в переменной типа BYTE
Dim a As Byte
a = &B0000_0101
'В переменной a - &B0000_0101
Swap a
'В переменной a - &B0101_0000

' ---------------------------------------------------------------
' Обмен значений байтов в переменной типа WORD или INTEGER
Dim a As Word
a = &B0000_0101_1010_0000
Swap a
'В переменной a - &B1010_0000_0000_0101

' ---------------------------------------------------------------
' Обмен значений между переменными
‘ Работает с переменными типа BIT, BYTE, INTEGER, WORD, LONG или STRING
Dim a As Byte , b As Byte
a = &B0000_0101
b = &B1010_0000
Swap a, b
'В переменной a - &B1010_0000
'В переменной b - &B0000_0101