以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于haschanges的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=65105)

--  作者:newsun2k
--  发布时间:2015/3/9 14:39:00
--  关于haschanges的问题
当前显示一个主表和子表,我想关闭该主表或者切换主表时,检查当前主表和子表是否有改动,如何实现?
我是通过菜单关闭的。
我利用CurrentTable.DataTable.haschanges时,如果鼠标点在主表,就是主表,子表就是子表。不能两个都检查一下。


--  作者:有点甜
--  发布时间:2015/3/9 14:41:00
--  

DataTables("主表").haschanges

 

DataTables("子表").haschanges

 


--  作者:newsun2k
--  发布时间:2015/3/9 14:43:00
--  
我通过菜单来实现的,所以我也不清楚当前的主表名称和子表的名称
--  作者:有点甜
--  发布时间:2015/3/9 14:47:00
--  
For Each t As Table In Tables
    If t.Name Like MainTable.Name & "*" Then
        msgbox(t.name & t.DataTable.HasChanges)
    End If
Next

 


--  作者:Bin
--  发布时间:2015/3/9 14:47:00
--  
CurrentTable.DataTable.HasChanges
For Each re As Relation In Relations
    If Re.ParentTable.Name= CurrentTable.DataTable.name Then
          DataTables(Re.ChildTable.Name).HasChanges
    Else If Re.ChildTable.Name= CurrentTable.DataTable.name Then
          DataTables(Re.ParentTable.Name).HasChanges
    End If
Next

--  作者:Bin
--  发布时间:2015/3/9 14:47:00
--  
帮助知识点 http://www.foxtable.com/help/topics/1941.htm