Foxtable(狐表)用户栏目专家坐堂 → 关联表如何刷新?


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

主题:关联表如何刷新?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107523 积分:546900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/3 20:18:00 [显示全部帖子]

        LockBaseMainForm() '锁定主窗口
        DataTables("医疗业务报表指标关联表").StopRedraw '停止绘制订单明细
        DataTables("医疗业务报表指标关联表").RemoveFor(fl) '移除当前订单的订单明细
        DataTables("医疗业务报表指标关联表").Appendload(fl) '追载当前订单的订单明细
        DataTables("医疗业务报表指标关联表").ResumeRedraw '恢复绘制订单明细
Dim str As String = DataTables("医疗业务报表指标关联表").GetComboListString("报表名称",fl)
fl = “报表名称 in ('" & str.replace("|","','") & "')”
        DataTables("医疗业务报表管理表").RemoveFor(fl) '移除当前订单的订单明细
        DataTables("医疗业务报表管理表").Appendload(fl) '追载当前订单的订单明细
        UnLockBaseMainForm() '解锁主窗口
   end if 

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107523 积分:546900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/4 11:10:00 [显示全部帖子]

试试最后加上

Tables("医疗业务报表指标关联表").Position = -1
Tables("医疗业务报表指标关联表").Position = 0

 回到顶部