如何用VB编写代码使登陆页面的密码是之前注册的密码

Private Sub Command1_Click()
Static I As Integer 'I用来统计输入错误的次数
If Text1.Text = Form1.Text1.Text And Text2.Text= Form2.Text2.Text Then
msgbox"登陆成功"
Else
I = I + 1
If I = 3 Then
MsgBox"你无权使用，请重新注册!"
Else
MsgBox "用户名或密码错误，请重新输入"
End If
End If
End Sub

这个编写分三部：
0、设计数据库、数据表：用于存放用户注册信息。
1、用户注册部分：用户信息输入到数据库，如果没有重复就添加。
2、登录部分，假设数据表Users,字段为Name,Password
,登录界面两个文本框（txtUserName,txtPassword）和一个按钮(cmdLogin),在按钮单击事件上编程如下：

'连接和打开数据库（略），定义conn,rs
rs.Open "Select * From Users Where Name='txtUserName.text' And Password='txtPassword.text'",conn,1,2
If Not rs.EOF Then
MsgBox "登录成功"
Set conn=Nothing
rs.Close
frmNewForm.Show'登录后要进入的窗体

Else
Msgbox "登录失败！可能是你没注册，或密码用户名不正确"
Set conn=Nothing
rs.Close
Exit Sub
End if

注册信息都是存在数据库的表里的
注册是向表插入