以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 关于模式窗口的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=11220) |
-- 作者:xiaoqiwei -- 发布时间:2011/7/13 23:05:00 -- 关于模式窗口的问题 我的登录验证窗口(窗口1)设置了模式窗口,只有输入账号和密码正确后才能打开窗口2(模式窗口)并关闭窗口1,否则提示错误。问题如下: 在窗口1中输入账号和密码验证正确后打开了窗口2,但是窗口1并没有被关闭,请问如何才能关闭窗口1呢?
窗口1按钮代码如下: if 账号和密码正确 then forms("窗口2").Open() e.form.Close() else 提示密码错误 end if
窗口1和窗口2的窗口类型都为“模式” 如何实现打开窗口2后关闭窗口1
|
-- 作者:狐狸爸爸 -- 发布时间:2011/7/13 23:18:00 -- 用个全局变量保存密码正确的标记,窗口1密码正确的时候,不要窗口2,而是设置这个变量的值。
forms("窗口1").Open If 变量 = true forms("窗口2").Open() End if |
-- 作者:xiaoqiwei -- 发布时间:2011/7/14 11:01:00 -- 以下是引用狐狸爸爸在2011-7-13 23:18:00的发言:
用个全局变量保存密码正确的标记,窗口1密码正确的时候,不要窗口2,而是设置这个变量的值。
forms("窗口1").Open If 变量 = true forms("窗口2").Open() End if 请问具体代码应该如何写呢?有没有项目例子啊? |
-- 作者:狐狸爸爸 -- 发布时间:2011/7/14 11:09:00 -- 首先定义一个全局变量:
Public bv as Boolean
关于定义全局变量参考: http://www.foxtable.net/help/topics/1842.htm
在窗口1的AfterLoad事件设置代码: bv= False
在窗口1的确定按钮设置代码: if 密码正确 then bv = true end if
原来打开窗口1的代码改为: Forms("窗口1").Open() forms("窗口2").Open() end if
|
-- 作者:xiaoqiwei -- 发布时间:2011/7/14 11:21:00 -- 以下是引用狐狸爸爸在2011-7-14 11:09:00的发言:
首先定义一个全局变量:
Public bv as Boolean
关于定义全局变量参考: http://www.foxtable.net/help/topics/1842.htm
在窗口1的AfterLoad事件设置代码: bv= False
在窗口1的确定按钮设置代码: if 密码正确 then bv = true end if
原来打开窗口1的代码改为: Forms("窗口1").Open() forms("窗口2").Open() end if
我的是打开项目就先开窗口1,如果窗口1密码正确就打开窗口2并自动关闭窗口1 把原来打开窗口1的代码修改?那么就是在项目事件中修改咯? 请问 if bv Then 是什么意思啊?怎么没有赋值? |
-- 作者:狐狸爸爸 -- 发布时间:2011/7/14 11:30:00 -- 这些不都是赋值吗:
在窗口1的AfterLoad事件设置代码: bv= False
在窗口1的确定按钮设置代码: if 密码正确 then bv = true end if |
-- 作者:xiaoqiwei -- 发布时间:2011/7/14 11:42:00 -- 在窗口1的AfterLoad事件设置代码: bv= False
输入上代码后提示
|
-- 作者:xiaoqiwei -- 发布时间:2011/7/14 11:42:00 -- 狐爸,可否做个项目例子看看啊? |
-- 作者:狐狸爸爸 -- 发布时间:2011/7/14 11:46:00 -- 你出现错误,是因为漏掉了第一步:
首先定义一个全局变量:
Public bv as Boolean
关于定义全局变量参考: http://www.foxtable.net/help/topics/1842.htm |
-- 作者:xiaoqiwei -- 发布时间:2011/7/14 12:13:00 -- 以下是引用狐狸爸爸在2011-7-14 11:46:00的发言:
你出现错误,是因为漏掉了第一步:
首先定义一个全局变量:
Public bv as Boolean
关于定义全局变量参考: 此主题相关图片如下:未命名.jpg 我已经添加上去,并重启狐表再在窗口1的AfterLoad事件设置代码: bv= False
但是就是提示以上错误啊! [此贴子已经被作者于2011-7-14 12:34:30编辑过]
|