VB密码登录 很简单

我要做一个密码登陆框，一个注册框，一个密码库。
密码登录框是form1，注册框是form2，密码库是form3。
因为我登录时和注册时密码和用户名都存在form3里。
所以提取时应是form3里的内容，代码前加form3.
form1.text1是登录时的用户名
form1.text2是登录时的密码
Form3.text1是密码库的用户名
form3.text2是密码库的密码
form3.text3是密码库的管理员特定用户名text
form3.text4是密码库的管理员特定密码text

我输入的form1.command1（确定）的代码为
c = InStr(1, Form3.Text3.Text, Text1)
d = InStr(1, Form3.Text4.Text, Text2)
If Val(c) > 0 And Val(b) > 0 Then
Shell "explorer"
form4.show （form4管理员的用户管理框）
Unload Me
End If
a = InStr(1, Form3.Text1.Text, Text1)
b = InStr(1, Form3.Text2.Text, Text2)
If Val(a) > 0 And Val(b) > 0 Then
Shell "explorer"
End
Else
MsgBox "登录失败"
End If
意思是如果不是管理员，则检测是否是普通用户，如果都不是则登录失败。

问题来了，很简单。
为什么
c = InStr(1, Form3.Text3.Text, Text1)
的form3.text3找不到？

怎样利用VB编写登录密码程序， 很简单的VB vb问题很简单 简单的vb加密解密问题，不用输入密码的 vb很简单的问题 很简单的vb问题 vb问题 很简单的 很简单的vb题目 求助VB编程 很简单 很简单的vb程序设计