Syntax
SHIFT var , LEFT/RIGHT [ , shifts]

Remarks

Var Byte, Integer/Word or Long variable.
Shifts The number of shifts to perform.
The SHIFT statements shifts all bits to the left or right and so for a byte after 8 shifts, the byte will be zero.

See also
SHIFTIN , SHIFTOUT ROTATE

Example

Dim a as Word
a = 128
SHIFT a, LEFT , 1
Print a '256