Para cifrar la palabra puede usar esta funcion:
Public Function fntEncriptar(ByVal strCadena As String) As String
Dim md5Hasher As MD5 = MD5.Create()
Dim data As Byte() = md5Hasher.ComputeHash(Encoding.Default.GetBytes(strCadena))
Dim sBuilder As New StringBuilder()
Dim i As Integer
For i = 0 To data.Length - 1
sBuilder.Append(data(i).ToString("x2"))
Next i
Return sBuilder.ToString()
End Function
Haciendo los siguientes imports:
Imports System.Text
Imports System.Security.Cryptography
Ejemplo de como llamarla:
Me.txtTextoEncriptado.Text = Me.fntEncriptar(Me.txtTextoPlano.Text)
Esa funcion calcula el valor Hash MD5 de una cadena y lo retorna como una cadena hexadecimal de 32 caracteres. La cadena Hash creada es compatible con cualquier función Hash MD5 (en cualquier plataforma) que cree una cadena Hash con las mismas características.
Edito: disculpe el descuido... no lei que era para C# hasta que le di al boton Guardar
. Pero no creo que sea muy dificil traducirlo...