All'interno di questa If

codice:
If Len(Rx$) Then ' Se ho ricevuto qualcosa lo scrivo nella TextBox
   frm_Terminal.Rich_terminal.Text = frm_Terminal.Rich_terminal.Text & Rx$
End If
devi considerare che, se il dato ricevuto e' il back space (ASCII 8), non devi aggiungere Rx$ al testo ma eliminare dal testo l'ultimo carattere a destra ...