Access开发培训
网站公告
·Access专家课堂QQ群号：151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群！    ·如何快速搜索本站文章|示例|资料    
您的位置：　首页 > 技术文章 > 综合其它

快捷添加数据时及时在组合框中刷新数据

来源:www.accessoft.com  点击数:11319  　 | 收藏 | 复制

时　间:2007-06-25 00:00:00
作　者:钱玉伟   ID：8  城市：上海  QQ：3059255点击这里给张志发消息
摘　要:如何快捷添加数据时及时在组合框中刷新数据
正　文:

在报销管理教程的学习过程中，在报销明细的新增窗体（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交流群 (群号:54525238) 　　　　　　Access源码网店

【打印此文】【关闭窗口】

常见问答:

技术分类:

相关资源:

源码示例

学习心得

最新文章

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助