Login Security ASP.Net

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="AddUser_aspx" %>



    Untitled Page


    
    UserID
    Password
    Confirm Password
    Security Question
    Answer
    Email
   
    


File: Default.aspx.vb
Imports System.Web.Security
Partial Class AddUser_aspx
    Inherits System.Web.UI.Page
    Protected Sub btnAddUser_Click(ByVal sender As Object, _
                                   ByVal e As System.EventArgs) _
                                   Handles btnAddUser.Click
        Dim IsCreated As MembershipCreateStatus
        If (txtPassword1.Text = txtPassword2.Text) Then
            Membership.CreateUser(txtUserID.Text, txtPassword1.Text, _
              txtEmail.Text, txtQn.Text, txtAns.Text, True, IsCreated)
            Response.Write("Add user: " & IsCreated.ToString)
        Else
            Response.Write("Passwords do not match")
        End If
    End Sub
End Class