189 8069 5689
1.首先添加2个label控件，一个caption为用户名，一个为密码然后分别在2个label控件后面添加一个text控件，
在赫山等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供成都网站制作、成都网站设计 网站设计制作按需策划设计,公司网站建设,企业网站建设,高端网站设计,成都营销网站建设,成都外贸网站建设公司,赫山网站建设费用合理。
2.将text的text属性设置为空再添加2个button按钮，一个名为登陆，一个名为取消简要代码如下：
private sub text2_change() sswordchar="*"end subprivate sub button1_click()if text1.text="text" and text2.text="123456" then '这里写验证代码... '通过验证后要干么elsemsgbox("用户名或者密码不正确！")end if end subprivate sub button2_click()endend sub
Try
Conn = New SqlConnection("Data Source = ASTRAYBI-PC;Initial Catalog = Attendsystem;" "Integrated Security = false; User ID=sa;Password=********")
Conn.Open()
Comm = New SqlCommand("pwd_CheckPass", Conn)
Comm.CommandType = CommandType.StoredProcedure
Comm.Parameters.Add("@CHKName", SqlDbType.VarChar, 30).Value = TBuser.Text
Comm.Parameters.Add("@CHKPass", SqlDbType.VarChar, 10).Value = TBpwd.Text
Comm.Parameters.Add("@ISValid", SqlDbType.VarChar, 20).Direction = ParameterDirection.Output
Comm.ExecuteNonQuery()
If Comm.Parameters("@ISValid").Value = "Good" Then
MessageBox.Show("Welcome!")
Attendsys.Show()
Me.Hide()
Else
MessageBox.Show("Wrong Password Or Unexisted User!")
End If
Catch ex As Exception
MessageBox.Show(ex.ToString())
End Try
具体步骤是建立数据库连接，赋值textbox控件，验证！
这个问题好宽泛，简单说下步骤吧：
简单来说，直接连接需要使用SQLConnection、SQLDataAdapter、SQLCommand、Datatable四个控件，先写好连接字符串，然后建立连接，写好SQL语句，通过DataAdapter从数据库读取数据到Datatable。这样只有在SQL服务器中附加数据库才能实现访问。还可以使用DSN实现数据库连接，控件依次更换为ODBCConnection、ODBCDataAdapter、ODBCCommand、datatable、基本步骤和上面说的一样。
SQL语句就是从数据库查用户名对应的密码，将数据从数据库读取到DataTable后，与用户输入的密码比对，相符则登陆成功，否则提示错误。
过程中的细节问题欢迎追问