我正在用和access编写一个用户登陆系统 ,现在不知道怎么把用户名框和密码框输入的信息与access数据库中的信息比较以确定此用户名和密码是否正确,请问该怎么办?

通过输入的用户名和密码,在数据库中查询是否存在记录.如果存在就说明正确,反之,输入错误.

Dim str As String
Dim datas As String = AppDomain.CurrentDomain.BaseDirectory + "App_Data\\data.mdb"
str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + datas
Dim conn As OleDbConnection
conn = New OleDbConnection(str)
conn.Open()
Dim strsql As String
Dim sql As String
strsql = "select * from utb where username='" & txtuser.Text & "' and password= '" & txtpwd.Text & "'"
Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader
dr = cmd.ExecuteReader
If (dr.Read) Then
Dim main As New main
main.ShowDialog()
me.Hide

Else
MsgBox("你输入的用户名或密码错误，请从新输入！", MsgBoxStyle.Critical, "提示")
txtpwd.Text = ""
txtuser.Focus()
End If
conn.Close()

3楼正解

这样做就会让登录窗口一直存在在内存中　，不是太好呀。

最好在模块中启动程序，然后调用登录窗口进行验证，验证通过，直接关闭登录窗口，而不是隐藏
再回到模块中利用Application.run(From) 运行窗口，就可以了。