nid help in encrypt password

[pohyf]

hi everyone. can i know how to encrypt the password using different addition.

example: 1st char +1 2nd char +5 3rd char +2 etc. i have mine done,but i only know to use hard coded password encrypt method. this is my code.

Dim Password As String
        Dim i As Integer



        Password = txtConfirmPwd.Text
        Result = vbNullString

        For i = 1 To Len(Password)
            Result = Result & Chr(Asc(Mid(Password, i, 1)) + 1)
        Next

im using vb 2005(express).sorry for my bad english.

[techniner]

Try something like this:

Imports System.Security.Cryptography
Imports System.Text

Public Function HashString(ByVal sString As String) As Byte()
Dim MD5 As New MD5CryptoServiceProvider()
Dim ENC As New UTF8Encoding()

HashString = MD5.ComputeHash(ENC.GetBytes(sString))

[pohyf]

sorry i'm new to vb,not very understand what the code is. can u explain more abit? i already key in the code n theres no error. thank u