vb.net用户登录,vb做登录系统

VB.NET用户登录，账号密码正确，却提示密码错误！

    Private Sub BtOk_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Btok.Click

        Dim con As OleDbConnection = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Admin.accdb;Persist Security Info=True")

        Dim com As OleDbCommand = New OleDbCommand("select * from 用户名", con)

        con.Open()

        Dim h1 As OleDbDataReader

        Dim table As New DataTable

        h1 = com.ExecuteReader()

        table.Load(h1)

        If txtName.Text = "" Then

            MsgBox("请输入用户名", MsgBoxStyle.OkCancel + MsgBoxStyle.Exclamation, "错误提示")

        ElseIf txtName.Text  "" And txtPasswd.Text = "" Then

            MsgBox("请输入密码", MsgBoxStyle.OkCancel + MsgBoxStyle.Exclamation, "错误提示")

        ElseIf table.Select("用户名='"  txtName.Text  "'").Length  0 Then

            If table.Select("用户名='"  txtName.Text  "'")(0)("密码").ToString = txtPasswd.Text Then

                    MsgBox("成功登陆", MsgBoxStyle.OkCancel + MsgBoxStyle.Exclamation, "错误提示") Then

                Form1.Show()

                Me.Visible = False

                Exit Sub

            Else

                MsgBox("密码错误", MsgBoxStyle.OkCancel + MsgBoxStyle.Exclamation, "错误提示")

            End If

        Else

            MsgBox("用户名不存在", MsgBoxStyle.OkCancel + MsgBoxStyle.Exclamation, "错误提示")

            Exit Sub

        End If

        table.Clear()

        h1.Close()

        con.Close()

    End Sub

相关问答

Q1: vb.net多个用户登录系统怎么做

需要连接数据库，你可以用access做个小型数据库

每次系统登录的时候，根据用户名去数据库查询密码

Q2: vb.net 用户登录

哈哈简单哪

第一步：登陆网页代码

第二步：登陆以后判断是否登陆成功

有两种方法：1.获取网页代码，判断网页字符有无”登陆成功”字样

源代码：

2.就是判断网页是否跳转到了某一页

源代码：

两种方法结合起来用，可以判断网页是否无法连接