So hab das mal im Simulator getestet. Dieser Code hier funktioniert nur bei Zahlen!

Code:
$sim
$regfile = "m2560def.dat"
$crystal = 8000000

Dim Eingabe As Byte

Config Com1 = 19200 , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0

Open "com1:" For Binary As #1

Do

   Input #1 , "Eingabe machen: " , Eingabe

   Print #1 , Eingabe


Loop

End
Und wenn du, wie bei dir, den COM3 benutzt musst du das COM1 durch COM3 ersetzen und das #1 durch #3.
So wenn du jetzt Buchstaben eintippen willst musst du statt:

Dim Eingabe As Byte

das hier schreiben:

Dim Eingabe As String * 10

Damit wird die Variable ein String mit 10 Zeichen länge. Und damit kannst du auch Buchstaben eingeben. Wenn du die Variable nur als Byte oder Integer deffinierst klappt das sonst nicht.
Ach und das:

$sim

muss auch raus, weil das nur für den Simulator ist.