主子窗体间数据移动有好多种方法，有没有办法在两个子窗体间做到数据同步移动？参照广州版主--Trynew 在2009年写的一篇主子窗体记录同步显示示例一文，略加修改。

窗体上有两个子窗体，他们的记录源相同，A子窗体列显示少些，B子窗体列显示全部。下面的例子展示在一个子窗体中移动光标，另一个子窗体中光标也同步移动的情况。

在A子窗体中加入以下代码：

Private Sub Form_Current()

On Error Resume Next

 If Not Me.Parent.Child198.Form.Recordset Is Me.Recordset Then  ‘CHILD198是B子窗体名

 Set Me.Parent.Child198.Form.Recordset = Me.Recordset

End If

End Sub

附   件:

两个子窗体数据移动