用vb.net做一个系统的登录界面，如何与access相连接？

想用VB做一个登陆界面如何和access相连接？~

1、首先在部件-控件里找到Microsoft ADO DataControl 6.0，打勾，然后在窗体上添加Adodc1。
2. 添加两个文本输入框text1,text2，分别用来接收用户输入用户名和密码。
3、在Adodc1控件的属性窗口中单击Connectionstring右侧的…按钮，打开ADO的属性页，选择“使用连接字符串”，单击“生成”按钮，打开数据链接属性对话框，在“提供程序”页中选择Microsoft Jet 4.0 OLE DB Provider，单击“下一步”，在“连接”页中，输入数据库名称XXXX.mdb（前提是将数据库文件和工程文件保存在同一目录下），单击“测试连接”，如果连接成功，单击“确定”即可。
4、将以下代码添加到登录按钮：
Private Sub Command1_Click()
Adodc1.RecordSource = "select * from 数据表名称 where username='" & Text1.Text & "'"
Adodc1.Refresh
If Adodc1.Recordset.EOF Then
MsgBox "没有这个用户，请重新输入正确的用户名", , "错误提示"
Else
If Text2.Text = Adodc1.Recordset.Fields("password") Then
MsgBox "登录成功！", , "错误提示"
Else
MsgBox "你的密码错误,请输入正确的用户密码！", , "错误提示"
End If
End If
End Sub

把你的这个半成品发给我，我帮你：syx54@sohu.com
补充，我只有vb.2005 或者 vb.2010

Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
Dim str As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Application.StartupPath() & "汽车出租管理系统.mdb" Dim con As SqlClient.SqlConnection = New SqlClient.SqlConnection(str)
Try
con.Open()
Dim b As String = "Select * From Table1 Where 用户名='" & UsernameTextBox.Text & "' And 密码 = '" & PasswordTextBox.Text & "' "And 是否管理员 = '" & True &"'"
Dim sqlcmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(b, con)
Dim dr As SqlClient.SqlDataReader
dr = sqlcmd.ExecuteReader
If dr.Read = True Then '判断一条记录为真
Form1.Show()
Me.Hide()
Else
MessageBox.Show("输入信息有误！", "提示")
PasswordTextBox.Text = ""
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

参考答案: 有些人，一旦遇见，便一眼万年;有些心动，一旦开始，便覆水难收。

---

盘县13751131818： 如何用vb.net实现用户登陆界面的操作? - ？
抄施氟米： select * from t1 where name=** and password=** and style=** 如果查询到的表是空的,说明登陆错误,否则成功

盘县13751131818： vb.net 用户登录 - ？
抄施氟米： 哈哈简单哪 第一步:登陆网页代码 http://vb2005.uz58.com/thread-109-1-1.html 第二步:登陆以后判断是否登陆成功 有两种方法:1.获取网页代码,判断网页字符有无”登陆成功”字样 源代码:http://vb2005.uz58.com/thread-111-1-4.html 2.就是判断网页是否跳转到了某一页 源代码:http://vb2005.uz58.com/thread-208-1-1.html 两种方法结合起来用,可以判断网页是否无法连接

盘县13751131818： VB.net做登陆界面 - ？
抄施氟米： http://develop.csai.cn/dotnet/200609200912591369.htm 这个网站有链接数据库的方法,判断登录信息就是传入的sql语句是取出密码字段和用户名字段,分别和textbox1的值和textbox2的值判断

盘县13751131818： 用VB写一个登陆界面. - ？
抄施氟米： Public conn As New SqlConnection(＂server=(local);database=student;Integrated Security=True＂) -----这是连接数据库的代码 Public comm As New SqlCommand Public dr As SqlDataReader comm.Connection = conn comm.CommandType = ...

盘县13751131818： 基于VB.NET的windows窗体程序如何连接sql2008数据库,制作一个登录界面 - ？
抄施氟米： 这个问题好宽泛,简单说下步骤吧:简单来说,直接连接需要使用SQLConnection、SQLDataAdapter、SQLCommand、Datatable四个控件,先写好连接字符串,然后建立连接,写好SQL语句,通过DataAdapter从数据库读取数据到...

盘县13751131818： 在vb,net中如何设计登陆验证的界面和程序 - ？
抄施氟米： 有许多方法,用一个类,在这个类中写个验证方法(修改方便),或直接在程序中写一个方法.再用image标签在第一次加载程序时调用方法.

盘县13751131818： 用vb.net做一个系统的登录界面,如何与access相连接? - ？
抄施氟米： Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click Dim str As String = ＂Provider=Microsoft.Jet.OLEDB.4.0;Data Source=＂& Application.StartupPath() & ＂汽车出租管理系统.mdb＂ Dim ...

盘县13751131818： 使用VB.net作个登录界面,怎样在用户名或密码错误情况下弹出合适的提示框? - ？
抄施氟米： msgbox可以.他除了可以写入提示的文字以外还可以选用多种按钮的组合还有提示图标,例如:感叹号、问号、错号等.

盘县13751131818： VB.net 用户登陆界面 - ？
抄施氟米： 首先要做个登录界面,并使用按钮事件 满意请采纳.

盘县13751131818： 用vb设计一个系统登录界面.将输入用户名的文本框命名为txtUsername,输入初始文字将输入密 - ？
抄施氟米： Private Sub Form_Load() txtPassword = ＂＂ txtUsername = ＂＂ txtPassword.MaxLength = 6 End Sub Private Sub Label1_Click() If txtUsername <> ＂txtUsername＂ Then MsgBox ＂请输入正确用户名＂, vbInformation, ＂Err＂ txtUsername = ...