- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求助 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=7896)
-- 发布时间：2010/8/17 20:03:00
-- 求助
项目有2个表对于2个窗口
[表A] [窗口1]
[表B] [权限窗口]
如何实现 窗口1中的按钮打开并在当前显示权限窗口
不知道是不是太啰嗦了。
如何切换别的表中的窗口到当前来，并显示
-- 发布时间：2010/8/17 20:10:00
--
独立、共有、模式现在直接打开指定窗口就行，其它类型窗口没有办法。
-- 发布时间：2010/8/17 21:32:00
--
我想的窗口类型是主窗口哦。
-- 发布时间：2010/8/17 21:36:00
--
主要是模仿windows7 的计算机管理界面。
选中不同的树形，打开不同的窗口。
此主题相关图片如下：1.png
此主题相关图片如下：2.png
-- 发布时间：2010/8/17 21:50:00
--
很简单，切换表就。
或者窗口全部设计在一个表中，窗口类型全部用主窗口，除了左边这个用主窗口或者停靠窗口。
-- 发布时间：2010/8/17 21:51:00
--
有一个变通的方法。
假设主窗口有一分组框，某表的窗口2有一分组框，分组框中有n控件。
在主窗口执行下述代码将窗口2的组合框及分组框中的n个控件移动到主窗口中的分组框中。
Forms("窗口2").Open()
e.Form.Controls("GroupBox1").AddControl(Forms("窗口2").Controls("GroupBox1"))
Forms("窗口2").Close
-- 发布时间：2010/8/17 22:04:00
--
变通的方法还是有点问题的哦。
控件绑定到数据表，需要进行操作，很简单。
如果调用到别的表中。会有不可见的错误的哦。
数据操作起来就很麻烦的。
狐爸，帮忙看看啦。
-- 发布时间：2010/8/17 22:05:00
--
嘿嘿，如果能切换主表，然后再加上Czy版主教的方法做通用操作导航。嘿嘿。方便很多哦。
-- 发布时间：2010/8/17 22:56:00
--
嘿嘿，CZY版主，我找到一个很BT的方法。说出来笑死你。
表A 按钮 代码
For Each c As Table In Tables
If c.Name <> Forms("窗口2").TableName Then
c.Visible = False
End If
Next
Forms("窗口2").show()
e.Form.Close
For Each d As Table In Tables
If d.Name <> Forms("窗口2").TableName Then
d.Visible = True
End If
Next
表C 有(窗口2)
不知道会不会影响效率哦。hoho