如何vb的口令登录应用
做2 个窗口
一个有用户名 口令有确定健和取消
如果密码对显示信息已成功进入应用程序
如果不对 显示第二个窗口:
请重新输入
问题点数：0、回复次数：4Top
1 楼aha99（学习-工作）回复于 2003-10-04 10:08:24 得分 0
主窗体
Private Sub Form_Load()
Form2.Show 1
End Sub
验证窗体的提交按钮
Private Sub Command1_Click()
'验证密码，在注册表或者数据库或者文件中保存的密码
If 验证成功 Then
Form2.Hide
Else
Form2.Caption = "密码不正确，请重新输入"
Form2.txtpass.Text = ""
Form2.txtuser.Text = ""
End If
End SubTop
2 楼lyz803（刘锋）回复于 2003-10-04 11:07:06 得分 0
最好使用Sub Main
dim Login as FrmLogig
if Login.Ok=true then '登陆成功
dim Main as FrmMain
Main.show
else '登陆失败
end
end if
这种格式更适合大的工程！
Top
3 楼pigpag（Pigpag - A GRE Fighter）回复于 2003-10-04 14:17:14 得分 0
……从基础做起Top
4 楼busisoft（chunlin）回复于 2003-10-04 14:32:22 得分 0
一个窗体就够了,一个消息框提示就行了.Top
