1.主子窗体记录同步;2.主窗体显示子窗体数据;3.子窗体对应的数据在主窗体显示。
在窗体上有子窗体,主子窗体的记录源相同,在主窗体上显示记录的明细并可修改录入,在子窗体上显示记录列表,并可进行筛选排序及进行记录的选择。需要在子窗体上用鼠标单击不同记录时,在主窗体中用文本框显示相应的记录明细,并可以对明细记录进行修改,明细记录与子窗体中记录同步。
这里采用的方法是在子窗体的成为当前事件中同步主子窗体的记录集,同步前先判断一下是否已经相同。在这里关键的是对象变量的比较及赋值的方法与一般变量的区别。
代 码:
Private Sub Form_Current()
On Error Resume Next
If Not Me.Parent.Form.Recordset Is Me.Recordset Then
Set Me.Parent.Form.Recordset = Me.Recordset
End If
End Sub
演 示:
示例下载:
在【了解更多】里下载。
声明:本站部分文章及图片源自用户投稿,如本站任何资料有侵权请您尽早请联系jinwei@zod.com.cn进行处理,非常感谢!