Need help with VB.NET(Difficulty:Easy)?

i'm supposed to replace each character in textbox1 to special characters assigned. But in this code the actual text gets replaced, I don't want that to happen,instead I want that to be shown in textbox2 retaining actual text in textbox1. How can I do that?

Here is the code:

Private arLetterChars() As Char = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890 "

Private arEncryptedChars() As Char = "¿ɸ¢ç¶‹!˜Ö´åÄÚᴁÍìæ¯~[Ûÿ|ÑûÏÉí³èô§ŠÀÙ:ÒÓ?>þ.äƒ%*š¾†±♠}@æŒ#/{۞],"

'// encrypt.

Private Sub Btnaddenc_Click(sender As System.Object, e As System.EventArgs) Handles BtnAddEnc.Click

With Textbox1

For Each myTextBoxChar As Char In Textbox1.Text '// loop thru TextBox, one char. at a time.

For i As Integer = 0 To arLetterChars.Length - 1 '// loop thru all letters in the Array.

'// if TextBox char ='s the char in your Array, replace the TextBox char with the same #'ed Array char of the Encrypted letters.

If myTextBoxChar = arLetterChars(i) Then Textbox1.Text = Textbox1.Text.Replace(myTextBoxChar, arEncryptedChars(i))

Next

Next

End With

End Sub

I tried to replace Textbox1.Text = Textbox1.Text.Replace(myTextBoxChar, arEncryptedChars(i)) to Textbox2.Text = Textbox1.Text.Replace(myTextBoxChar, arEncryptedChars(i)).

But that did not replace all characters to special character.

eg: Mathew should be ?É*Àô† but it is mathe†