How do I convert a string to a number?

Dim result As Byte
Dim char(10) As Byte
Dim i As Byte

Hseropen 9600

result = 0
For i = 1 To 10
char = LookUp("1234567890"), i

result = #char-30 'take chars hex value and subtract 30 from it.

Hserout result

Next i

End

For i = 0 To 10
char = LookUp("1234567890"), i

result = char - 48  'take chars hex value and subtract 48 (30 hex) from it.

Hserout #result

Next i