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

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]页面集合的问题！  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=16021)

--  作者：gaoyong30000
--  发布时间：2012/1/30 17:17:00
--  [求助]页面集合的问题！
我窗口A 页面集合设置的双击就隐藏当前选中的页面

如何判断页面集合里页面全部隐藏后就关闭当前窗口？

[此贴子已经被作者于2012-1-30 22:38:41编辑过]

--  作者：kitty
--  发布时间：2012/1/30 20:53:00
--
假设有3个标签，那就设置3个Boolean型变量flag1,flag2,flag3,对应每个页面，隐藏一个就令Boolean型变量为false.再判断所有的变量是否都为false，如果是则关闭当前窗口。

--  作者：gaoyong30000
--  发布时间：2012/1/30 21:04:00
--
额这是个方法！不过俺项目里有6个变量了汗

--  作者：gaoyong30000
--  发布时间：2012/1/30 23:07:00
--
Dim flag As Boolean=True
For Each pg As WinForm.TabPage In Forms("窗口1").Controls("TabControl1").TabPages
    If pg.Visible=True Then
        flag=False
    End If
Next
If flag=True Then
    MessageBox.Show("都隐藏了")
Else
    MessageBox.Show("有没有隐藏的")
End If
多谢了~