以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=7896)

--  作者:qtcks
--  发布时间:2010/8/17 20:03:00
--  求助

项目有2个表对于2个窗口

 [表A]   [窗口1]

 [表B]   [权限窗口]

 

如何实现 窗口1中的按钮打开并在当前显示权限窗口

不知道是不是太啰嗦了。

如何切换别的表中的窗口到当前来,并显示


--  作者:czy
--  发布时间:2010/8/17 20:10:00
--  
独立、共有、模式现在直接打开指定窗口就行,其它类型窗口没有办法。
--  作者:qtcks
--  发布时间:2010/8/17 21:32:00
--  
我想的窗口类型是主窗口哦。图片点击可在新窗口打开查看
--  作者:qtcks
--  发布时间:2010/8/17 21:36:00
--  

主要是模仿windows7 的计算机管理界面。

选中不同的树形,打开不同的窗口。


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2010/8/17 21:50:00
--  

很简单,切换表就。

或者窗口全部设计在一个表中,窗口类型全部用主窗口,除了左边这个用主窗口或者停靠窗口。


--  作者:czy
--  发布时间: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


--  作者:qtcks
--  发布时间:2010/8/17 22:04:00
--  

变通的方法还是有点问题的哦。

控件绑定到数据表,需要进行操作,很简单。

如果调用到别的表中。会有不可见的错误的哦。

数据操作起来就很麻烦的。图片点击可在新窗口打开查看

狐爸,帮忙看看啦。


--  作者:qtcks
--  发布时间:2010/8/17 22:05:00
--  
嘿嘿,如果能切换主表,然后再加上Czy版主教的方法做通用操作导航。嘿嘿。方便很多哦。
--  作者:qtcks
--  发布时间: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