Как зашифровать пароль, введенный в форму входа с помощью VB?

---

В моей форме входа пользователь должен ввести имя пользователя и пароль в соответствующие текстовые поля, а затем нажать кнопку Войти. Имя пользователя и пароль уже сохранены в текстовом файле, каждый раз, когда пользователь пытается ввести имя пользователя и пароль, введенные им, будут сопоставлены с теми, которые были сохранены в текстовом файле, и если они совпадут, только тогда пользователю будет разрешен доступ. Теперь я хочу иметь возможность зашифровать пароль, введенный в текстовое поле, я пробовал искать в интернете, но не нашел никакой помощи. У кого-нибудь есть какие-нибудь идеи? Заранее спасибо.

Что я уже пробовал:

Dim intnum1 As Integer

    Dim str2 As String

    Dim icounter As Integer

 

 

    Private Sub cmdCipher_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdCipher.Click

        For icounter = 1 To Len(txtCTC.Text)

            intnum1 = Asc(Mid(txtCTC.Text, icounter, 1)) 'Converts the letter to a ANSI number

            intnum1 = intnum1 + 3 'Adds three to the ANSI number

            str2 = Chr(intnum1)   'Converts the ANSI number back to a letter

 

            txtCipher.Text = txtCipher.Text & str2 'Adds the ciphered letter to the end of whatever was previously in the textbox

        Next

    End Sub

 

 

    Private Sub cmdDecipher_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdDecipher.Click

        For icounter = 1 To Len(txtCipher.Text)

            intnum1 = Asc(Mid(txtCipher.Text, icounter, 1)) 'Converts the letter to a ANSI number

            intnum1 = intnum1 - 3 'Adds three to the ANSI number

            str2 = Chr(intnum1)   'Converts the ANSI number back to a letter

 

            lbldecrypt.Text = lbldecrypt.Text & str2 'Adds the ciphered letter to the end of whatever was previously in the textbox

        Next

    End Sub

End Class

---