Foxtable(狐表)用户栏目专家坐堂 → 主表和明细表 明细表不显示数据


  共有1918人关注过本帖树形打印复制链接

主题:主表和明细表 明细表不显示数据

帅哥哟,离线,有人找我吗?
mayazql
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:372 积分:2582 威望:0 精华:0 注册:2012/10/29 8:32:00
主表和明细表 明细表不显示数据  发帖心情 Post By:2016/8/2 20:29:00 [显示全部帖子]

如下图,窗体中有一个主表,有一个关联的子表,现在发现有时关联的子表不显示数据,要把程序关掉重现打开才可以


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

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

麻烦帮忙看下什么原因。谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
mayazql
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:372 积分:2582 威望:0 精华:0 注册:2012/10/29 8:32:00
  发帖心情 Post By:2016/8/2 20:53:00 [显示全部帖子]

解决了,在主表的currentchanged 的事件加入下面的代码:

If Forms("入库单主窗口").Opened = True Then
    
    Dim r As Row = Tables("insmain").Current
    Dim fl As String = "入库单号 = '"  & r("入库单号") & "'"
    r.Load() '加载父行
    LockBaseMainForm() '锁定主窗口
    DataTables("inssub").StopRedraw '停止绘制订单明细
    DataTables("inssub").RemoveFor(fl) '移除当前订单的订单明细
    DataTables("inssub").Appendload(fl) '追载当前订单的订单明细
    DataTables("inssub").ResumeRedraw '恢复绘制订单明细
    UnLockBaseMainForm() '解锁主窗口
    
End If

多看帮助


 回到顶部