Wie kann ich einen String "1-200" in ein Byte setzen?

[Typer]

Hi,
ich habe einen String der sich zwischen 1 und 200 bewegt. (Der String kommt über Seriele)
Diesen möchte ich in ein Byte schreiben.

Ich kann den String aufteilen in 3 Bytes mit MID oder Overlay

aber der String müsste in ein Byte geschrieben werden. (Als Char)

Gibt es da eine Befehl?

Oder kann ich irgendwie 2 oder 3 Bytes zusammenfügen?

Zahl1 = 1
Zahl2 = 2
ergebnis = zahl1 und zahl2 (Sollte also nicht 3 sondern 12 sein)

Vielleicht kann mich jemand vom Schlauch holen auf dem ich stehe.

[Christian H]

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

[Typer]

a = Val(s) 'convert string

Wie einfach
aber mir ist es absolut nicht mehr eingefallen. Hab viel zu kompliziert gedacht und dabei habe ich den Befehl schon öfters verwendet.

DANKE!!