Const pi = 314
Const beta = 123
Dim abit As Bit
Dim abyte As Byte
Dim aword As Word
Dim arry(5) As Byte
abit = 0
abit = 1
abit = 0x01
abit = %1
abit = %0
abit = 1h
abit = True
abit = False
''abyte = &13 'not allowed
''abyte =.13 'not allowed
''abyte = #13'not allowed
abyte = %00010011 'binary notation
abyte = 13h 'hex notation
abyte = 0x13 'hex notation
abyte = 13 'decimal
abyte = arry(0)
abyte = beta 'constant
aword = %0000000000010011 'binary notation
aword = 1213h 'hex notation
aword = 0x1213 'hex notation
aword = 1213 'decimal
aword = arry(0)
aword = pi 'constant