以文本方式查看主题

-  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=20742)

--  作者:rjh4078
--  发布时间:2012/6/18 15:41:00
--  请教一个同一表多处调用的问题

 

 

有个关联表A.B 在2个窗口有调用 这两个窗口都是主窗口 现在有个问题 当打开A窗口以后再打开B窗口 B窗口调用A.B的部分就会是空白

我现在想实现 当从A切换到B时 系统自动关闭A窗口不知道要用什么事件

有一个比较麻烦的问题是 我在菜单切换时的涉及的表是非常多的 如果逐个写有点麻烦

我的想法是 只要用户点击按钮切换了窗口 就关闭之前的窗口

我现在的代码是

 

If MainTable.DataTable.HasChanges Then
Dim re As Dialogresult
re=MessageBox.show("当前记录已经修改是否保存?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question)
    If re= DialogResult.Yes
        MainTable.DataTable.Save()
        ElseIf  re= DialogResult.NO
        MainTable.current.reject()
    End If
Else

End If

forms("A.B").open
MainTable = Tables("A.B")

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目test.table

[此贴子已经被作者于2012-6-18 15:43:59编辑过]

--  作者:blackzhu
--  发布时间:2012/6/18 15:51:00
--  
forms("xxx").close
forms("xxx").open

--  作者:rjh4078
--  发布时间:2012/6/18 16:02:00
--  

现在想到一个效率比较低的方法

 

for each  frm as winform.form in forms

   frm.close

next

froms("窗口1").show

maintable=tables("A.B")