Foxtable(狐表)用户栏目专家坐堂 → 系统解锁后返回到锁定时工作窗口


  共有2885人关注过本帖树形打印复制链接

主题:系统解锁后返回到锁定时工作窗口

帅哥哟,离线,有人找我吗?
wjliu510
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:63 积分:473 威望:0 精华:0 注册:2015/4/28 11:49:00
系统解锁后返回到锁定时工作窗口  发帖心情 Post By:2015/4/29 11:16:00 [只看该作者]

请教各位版主:系统设了锁定和解锁功能 解锁成功后如何回到系统锁定时的工作窗口

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/29 11:16:00 [只看该作者]

你采用的是什么方式的锁定和解锁. 

 回到顶部
帅哥哟,离线,有人找我吗?
wjliu510
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:63 积分:473 威望:0 精华:0 注册:2015/4/28 11:49:00
  发帖心情 Post By:2015/4/29 11:23:00 [只看该作者]

菜单设计 配置栏里设置  代码:

Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
   frm.close

End If
Forms("用户系统设置").Show

 

用户系统设置窗口beforeclose代码:

Dim pwd As String = e.Form.Controls("TextBox1").Text
If pwd <> "123456" Then
    msgbox("密码不正确,请输入正确的密码1234**")
    e.cancel = True
    End If


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/29 11:30:00 [只看该作者]

用一个全局变量.把 frm.Name存下来

然后再用 froms(全局变量) .SHOW 即可

 回到顶部
帅哥哟,离线,有人找我吗?
wjliu510
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:63 积分:473 威望:0 精华:0 注册:2015/4/28 11:49:00
  发帖心情 Post By:2015/4/29 11:39:00 [只看该作者]

我是在afterclose里加了一个代码 forms("x").open()

如何把x指向当前工作窗口


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/29 11:40:00 [只看该作者]

菜单设计 配置栏里设置  代码:

Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
   frm.close

End If


用一个全局变量.把 frm.Name存下来

然后再用 froms(全局变量) .SHOW 即可


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/29 11:40:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
wjliu510
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:63 积分:473 威望:0 精华:0 注册:2015/4/28 11:49:00
  发帖心情 Post By:2015/4/29 11:47:00 [只看该作者]

全局变量不懂

变量名称  变量类型 初始值怎么选


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/29 11:48:00 [只看该作者]

看7楼帮助连接

 回到顶部
帅哥哟,离线,有人找我吗?
wjliu510
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:63 积分:473 威望:0 精华:0 注册:2015/4/28 11:49:00
  发帖心情 Post By:2015/4/29 11:49:00 [只看该作者]

看不懂 我不是专业人士

 


 回到顶部
总数 18 1 2 下一页