父行和子行的同步刷新 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 父行和子行的同步刷新

共有3266人关注过本帖树形打印复制链接主题：父行和子行的同步刷新

seal51

小大 21楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1837 积分：12990 威望：0 精华：0 注册：2013/6/10 9:23:00

Post By：2014/12/5 12:52:00 [只看该作者]

方案二，在订单主表上做两个按钮，一个按钮为刷新订单主表，一个按钮为刷新订单明细表

刷新订单主表按钮的代码为DataTables("订单主表").Load，刷新订单明细表的按钮代码为：

Dim r As Row = Tables("订单主表").Current
Dim fl As String = "工作号 = '" & r("工作号") & "'"
r.Load() '加载父行
LockBaseMainForm() '锁定主窗口
DataTables("订单明细表").StopRedraw '停止绘制订单明细表
DataTables("订单明细表").RemoveFor(fl) '移除当前订单的订单明细表
DataTables("订单明细表").Appendload(fl) '追载当前订单的订单明细表
DataTables("订单明细表").ResumeRedraw '恢复绘制订单明细表
UnLockBaseMainForm() '解锁主窗口

甜老师，这样做可否，会产生什么问题呢

这两个方案那个好呢，或者都不好，有无更好的做法呢？