Potresti provare dichiarando una variabile String contenente il contenuto (scusate la ripetizione) della TextBox, poi usi String.Replace() per rimpiazzare ad esempio A con 18.

codice:
Dim str As String = TextBox1.Text  
str.Replace("A", "18")
Prova a fare così, anche se, come ha detto Oregon nei messaggi precedenti, non ne capisco il senso

Ciao,
Panda