[求助]锁屏遇到的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]锁屏遇到的问题

共有4920人关注过本帖树形打印复制链接主题：[求助]锁屏遇到的问题

xu3180497

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：153 积分：1174 威望：0 精华：0 注册：2013/6/19 10:54:00

[求助]锁屏遇到的问题 发帖心情

Post By：2013/8/2 14:59:00 [只看该作者]

在锁屏时出现怪异的现象，锁屏不起作用，菜单锁屏代码：

Forms("锁屏").Open() '开启锁屏窗口
BaseMainForm.Visible = False '隐藏主界面

锁屏窗口中按钮代码：

Dim UserName As String = e.Form.Controls("Label1").Text
Dim lo = Tables("用户表").Find(UserName,0,"用户名",False,True,False)
Dim dr = DataTables("用户表").DataRows(lo)
If e.Form.Controls("TextBox1").Text = dr("密码") Then
    e.Form.Close
    BaseMainForm.Visible = True '隐藏主界面
Else
    Messagebox.show("密码错误,请重新输入!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

锁屏界面：

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20130802145658.png

现在打开项目后单击锁屏菜单按钮，只能出现一个锁屏窗口，主窗口却没有隐藏，输入解锁密码后，主窗口却隐藏了，锁屏窗口也不见了。

请教怎么改正呢？

oaok	小大 2楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：六尾狐帖子：1198 积分：7859 威望：0 精华：0 注册：2013/5/17 14:26:00	Post By：2013/8/2 15:03:00 [只看该作者] 用户已经被屏蔽