我是新来的，最近学习VB6.0，有难题特向大家指教！

如何用用VB设计一个不连接数据库的系统登录界面。
设计要求：1、已有提示账号密码，根据此登录，登录成功弹出欢迎界面，登录失败弹出重新登录。
2、退出界面时需要输入密码方能退出，密码成功整个登录界面退出，密码错误一直停留在此。
3、提供3次登录机会，登录失败，强制退出。
4、使用msgbox、inputbox、if等语句，登录和退出两个空间，一条写有登录账号密码和退出的账号密码的标签。

如图所示，各位VB的高手，小弟诚恳的向大家求教了，拜托各位！

求回复啊~！

不知道你还要不要，发一个给你看看吧.........

Option Explicit
Private a As Single Private Sub Command1_Click()
a = a + 1
If a > 3 Then
End
End If
If Text1.Text = "123" Then
If Text2.Text = "456" Then
MsgBox "登陆成功！", vbInformation
Else
MsgBox "登录失败！重新登录！", vbCritical
End If
End If
End Sub Private Sub Command2_Click() Dim b As Single
b = InputBox(" 请输入密码：")
If b = "456" Then
End
Else
MsgBox "密码错误！", vbCritical
End If
End Sub

if text1和if text2那两句能不能合起来

支持五楼不要和起来用一个if语句就够了。中间用and连接再去掉一个end if不然会乱的 if text1.text=123 and text2.text=456 then ... ... end if

楼上不能真正实现注册登录

三楼的我问一下，你经常用到的vbinformation之列的这些词的作用是什么？这个程序用的到吗？

lz这个要脸数据库，要嫌麻烦，我可以给你发一个不麻烦的数据库

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

20回复贴，共1页

<<返回vb6.0吧

分享到:

日	一	二	三	四	五	六