急急急，在线等待，关于VB自带登陆对话框!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Question

请问VB自带登陆对话框该怎么使用才能在输入密码后呼出另一个窗体？

Answer 1

Option ExplicitPublic LoginSucceeded As BooleanPrivate Sub cmdCancel_Click()
    '设置全局变量为 false
    '不提示失败的登录
    LoginSucceeded = False
    Me.Hide
End SubPrivate Sub cmdOK_Click()
    '检查正确的密码
    If txtPassword = "password" Then
        '将代码放在这里传递
        '成功到 calling 函数
        '设置全局变量时最容易的
        LoginSucceeded = True
        Me.Hide
    Else
        MsgBox "无效的密码，请重试!", , "登录"
        txtPassword.SetFocus
        SendKeys "{Home}+{End}"
    End If
End Sub
怎么样修改这段代码啊？
假如我想设用户名：aaa
密码为：bbb

Answer 2

你是想到数据库里面进行密码验证呢还是想到文件里面进行密码验证呢？
如果所有验证都通过了。就
ME。HIDE
FOR2。SHOW

Answer 3

LoginSucceeded = True
me.hide
之后添加
from2.show vbmodal

Answer 4

我想在一个INI的文件里进行验证最好
[用户名]
aaa
[密码]
bbb

Answer 5

要不用旧用ADO控件要不就用ADO对象！ADO控件容易一些！但步灵活！