求VB登陆界面详细代码

显示全部楼层 · 2008-5-26 19:49:54

要求需要在VB里面做密码,用户名可以登陆,通过所绑定的数据库定义的用户就是说数据库里的用户名跟密码在登陆界面里都可以登陆! 需要详细的代码急求哦!!帮忙哦!!!
以下是我之前做的人家说只能登陆一个用户他们需要的是数据库里的用户都可以登陆
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

If TextBox1.Text = 777 And TextBox2.Text = 888 Then

MsgBox("登陆成功!") form1.show()

Else

MsgBox("输入错误")

End If

End Sub
End Class
这里我建立了2个BUTTON 2个TEXTBOX

千问 · 2008-5-26 19:49:54

1.拖出两个text 两个command 分别命名为：txtUser ，txtPwd ，cmdLoginEnter ，cmdLoginCancel2.在程序根目录下新建 date.mdb 数据库表名为：user字段1为：username 字段2为：pwd 数据库密码为：111(可根据)
Set dbLogin = OpenDatabase(App.Path + "\Data.mdb", False, False, "MS Access;pwd=111") 修改自定义。3.复制以下代码。------------Option ExplicitDim intTryTimes As IntegerDim dbLogi