Dim a as byte, s As String * 10
s = "123"
a = Val(s) 'convert string
Print A ' 123
End

so geht es.
mf gpebisoft