' 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