哪位可以提供一个简单的登陆界面程序
哪位可以提供一个简单的淡路界面程序(Form1),用户名:www,密码:111,使它能够与Form2相连,
我用的数据库是SQLserver,谢谢
[解决办法]
Public LoginSucceeded As Boolean
------------------------------------------
由于不能贴图,窗体上两个text,一个是输入用户名的:“txtUserName”,另
一个是输入密码的:“txtPassword”;登录按钮为:“cmdOK”
------------------------------------------
Private Sub cmdOK_Click()
'检查正确的密码
If txtUserName= "www " and txtPassword = "111 " Then
'将代码放在这里传递
'成功到 calling 函数
'设置全局变量时最容易的
LoginSucceeded = True
Me.Hide
from2.show
Else
MsgBox "无效的用户名或密码,请重试! ", , "登录 "
txtPassword.SetFocus
SendKeys "{Home}+{End} "
End If
End Sub