- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何去除使用模式窗口的用户登录界面 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157128)
-- 发布时间：2020/10/5 10:14:00
-- 如何去除使用模式窗口的用户登录界面
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:自定义用户管理之一.foxdb |
用例子中的“自定义用户管理之一”建一个小系统，使用一个模式窗口作为登录后的主界面，发现用户登录后，主界面后面的用户登录窗口还是没有消失，且不能移动，
请问如去除这个空的用户登录窗口？
以下这段代码是放在用户登录窗口的“确定”按钮中
If
e.Form.Controls("PassWord").Value = dr("Password") Then
_UserName = UserName
_UserGroup = dr("Group")
e.Form.Close
If
Forms("测试窗口").Opened Then
Else
Forms("测试窗口").Open
End If
Else
Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
此主题相关图片如下：用户登录窗口.jpg
-- 发布时间：2020/10/6 10:50:00
--
自己顶下
-- 发布时间：2020/10/6 11:01:00
--
参考：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=90998
-- 发布时间：2020/10/6 11:58:00
--
谢谢，抄了上贴版主的回复代码，可以了
e.Form.baseform.Close
e.Form.baseform.opacity = 0