请教BIN老师,4楼的和下面帮助中的有什么区别?
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()
'解锁主窗口