8 lines
178 B
Text
8 lines
178 B
Text
' FB 1.05.0 Win64
|
|
|
|
Dim s(1 To 4) As String = {"&H1a", "26", "&O32", "&B11010"} '' 26 in various bases
|
|
For i As Integer = 1 To 4
|
|
Print s(i); Tab(9); "="; CInt(s(i))
|
|
Next
|
|
|
|
Sleep
|