在报销管理教程的学习过程中,在报销明细的新增窗体(frmBxmx_child_Add)上的报销类别和报销人旁边都有一个“添加”按钮,用来当没有相应的选择项时,可以在这个地方进行添加。在实现这个功能的时候我们会发现当我们在快捷添加窗口中添加了数据然后回组合框中选择刚添加的数据时组合框中并没有出现刚添加的数据,这是因为添加数据后没有执行刷新数据的功能,下面以报销管理系统为例来详细说明下如何实现及时刷新数据的功能。
打开frmBxmx_child_Add窗体,进入代码编辑窗口,可以看到如下几行代码:
Private Sub cmdBX_ButtonClick(ByVal Button As Object)
DoCmd.OpenForm "frm_CodeBxlb_child_Add"
End Sub
Private Sub cmdYG_ButtonClick(ByVal Button As Object)
DoCmd.OpenForm "frmyg_child_Add"
End Sub
把这两行代码改为如下:
Private Sub cmdBX_ButtonClick(ByVal Button As Object)
DoCmd.OpenForm "frm_CodeBxlb_child_Add", , , , , acDialog
Me.lbId.Requery
Access软件网交流QQ群(群号:198465573)