永发信息网

vb编程高手请进来帮忙!谢谢!

答案:5  悬赏:20  手机版
解决时间 2021-06-02 05:23
  • 提问者网友:做自己de王妃
  • 2021-06-01 13:46

如图

要求:

若用户正确输入账号与密码(登录窗体是form2)才能操作MDIform1的各项功能如主菜单相反用户不许操作MDIform1(实现的效果就是用户如果没有正确输入密码若再点击MDIform1是没有反应的)

最佳答案
  • 五星知识达人网友:独行浪子会拥风
  • 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
给出两个方案。 【方案1】 思路:成功登录前,先禁用MDIform1的各控件(例如菜单)。登录后,重新启用各控件。 示例代码: 在显示frmLogin(假设登录窗口的名字)之前,执行mnuFile.Disable=true(禁用某菜单),多个菜单的话就多几条语句就行,呵呵!有工具条的话,还可以tlbToolbox.disable=true。 然后在frmLogin的登录成功代码段中,加入mnuFile.Disable=false等,就能实现你想要的功能了。 【方案2】 思路:显示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

这个很简单,但是如果详聊一下,也许更好更快的帮助你

我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯