Náhrada znaku jiným – Visual Basic – Fórum – Programujte.com

Našel jsem si na jednom webu návod jak na to. Udělal jsem to, ale mám problém a hned dva:
1. Chtěl bych aby se to nepřeměnovali postupně jak to je v kodu.
2. Aby se výsledný paskvil vyhodil do TextBoxu2.

Tady je úryvek z kodu:
Dim nahradit As String = TextBox1.Text
MsgBox(nahradit.Replace("A", "Q"))
nahradit.Replace("B", "W")
nahradit.Replace("C", "E")
nahradit.Replace("D", "R")

Takhle to pokračuje písmena podle abeceda se nahradí písmeny na klávesnici od Q až po M.

Problém vyřešen