如图
要求：
若用户正确输入账号与密码（登录窗体是form2）才能操作MDIform1的各项功能如主菜单相反用户不许操作MDIform1（实现的效果就是用户如果没有正确输入密码若再点击MDIform1是没有反应的）
vb编程高手请进来帮忙！谢谢！
答案:5 悬赏:20 手机版
解决时间 2021-06-02 05:23
- 提问者网友：做自己de王妃
- 2021-06-01 13:46
最佳答案
- 五星知识达人网友：独行浪子会拥风
- 2021-06-01 15:19
非常简单！
先把form2设为最先启动窗口！
然后想在form2窗体中写下面代码！
Private Sub Command1_Click()
If Text1.Text = "账号" And Text2.Text = "密码" Then
MDIForm1.Visible = True
Unload Me
Else
MsgBox "账号密码错误！请重新输入！"
End If
End Sub
全部回答
- 1楼网友：刀戟声无边
- 2021-06-01 20:04
给出两个方案。
【方案１】
思路：成功登录前，先禁用MDIform1的各控件（例如菜单）。登录后，重新启用各控件。
示例代码：
在显示frmLogin（假设登录窗口的名字）之前，执行mnuFile.Disable=true（禁用某菜单），多个菜单的话就多几条语句就行，呵呵！有工具条的话，还可以tlbToolbox.disable=true。
然后在frmLogin的登录成功代码段中，加入mnuFile.Disable=false等，就能实现你想要的功能了。
【方案２】
思路：显示frmLogin时，使用模式窗口。于是当前应用程序就只有frmLogin窗体能操作，其它窗体（例如MDIform1等）就不能操作了。
示例代码：
在MDIform1调用显示frmLogin时，使用语句： frmLogin.show 1
关键就是这个“1”，令frmLogin成为了独占地位。
嗯，就这两个方案，楼主请根据自身程序的需求来选用吧！祝你成功！
- 2楼网友：思契十里
- 2021-06-01 18:43
if command1.caption="name" and command2.caption ="password" then
MDIForm1.command1.enabled=ture 'mdiform1.command1表示 mdiform1中管理员可操作的按纽等。最好用数组。
end if
- 3楼网友：猎心人
- 2021-06-01 17:52
LZ的意思就是： 没有正常登录的时候不能点击MDIform1的菜单、及工具条？
貌似简单吧，你可以将你的MDIFORM1内各项菜单及工具条的选项设置为“无效”，这样菜单栏各项均为‘灰色’且不可以点击， 当正确登录收，在改变菜单项的相关值为TRUE。
-----
不写程序好多年，仅仅给你提供一个思路而已，但愿能用上
- 4楼网友：大漠
- 2021-06-01 16:18
加我的QQ:9986666@qq.tm 答案是：110
这个很简单，但是如果详聊一下，也许更好更快的帮助你
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯