<%@ Page Language="VB" Debug="true" %>
<Script runat="server">
    Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) 

    End Sub 

    Public Sub btnHash_Click(ByVal sender As Object, ByVal e As EventArgs) 
           If tbPassword.Text.Length > 0 Then 
              Dim strHashedPassword As String = FormsAuthentication.HashPasswordForStoringInConfigFile(tbPassword.Text, "sha1") 

              Dim strHashedPassword2 As String = FormsAuthentication.HashPasswordForStoringInConfigFile(tbPassword.Text, "MD5")

              liHashedPassword.Text = "Hashed(shal) Password is: " + strHashedPassword + "<BR>" + "Hashed(MD5) Password is:" + strHashedPassword2
           End If 
     End Sub
</Script>

<Form runat="server">
<asp:TextBox id="tbPassword" Runat="server"/>
<asp:Button id="tbnClick" Text="Click" Runat="server" OnClick="btnHash_Click"/><BR>
<asp:Label id="liHashedPassword" Runat="server"/>
</Form>