以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  按钮  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53307)

--  作者:shanmao
--  发布时间:2014/7/4 15:11:00
--  按钮
A窗口中有个A1按钮,B窗口中有关B1按钮,当我在A窗口中点击A1按钮时,能够打开B窗口,并且B窗口中B1按钮不可见或者不可用。代码加在A1按钮里,怎么写?
--  作者:Bin
--  发布时间:2014/7/4 15:15:00
--  
设置一个全局变量 或者Var变量   例如 vars("b1")=false

B1按钮Click代码  
vars("b1")=True
forms("窗口B").show

窗口B AlterLoad 事件
IF vars("b1") then
   e.form.controls("b1").Visible=false
end if

窗口B BeforClose 事件
vars("b1")=False