Access数据库培训
网站公告
·Access快速平台QQ群号:189307860    ·Access快速开发平台下载地址及教程    ·欢迎添加微信交流账号:Accessoft7    ·如何快速搜索本站文章|示例|资料!    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

万能的刷新代码/刷新窗体里所有控件代码

时 间:2018-04-11 21:56:40
作 者:杜超   ID:16058  城市:江阴
摘 要:把下面代码复制到要刷新的事件里即可
正 文:

刷新本窗体中所有子窗体:

dim xCtrl as control
for each xctrl in me.controls
  if xctrl.controltype=acsubform then
        xctrl.requery
  end if  
next 



刷新本窗体中所有子窗体、组合框、列表框:

dim xCtrl as control
for each xctrl in me.controls
  if xctrl.controltype=acsubform or xctrl.controltype=acComboBox or xctrl.controltype=acListBox then
        xctrl.requery
  end if  
next 




Access软件网QQ交流群 (群号:473665531)       access源码网店

最新评论 查看更多评论(3)

2018/4/12 9:35:15wsxwsx1
有点搞笑哈

2018/4/12 8:50:21轻风
万能体现在哪里?

2018/4/12 8:27:22凝听
用在哪里地方呢,最好举个例子啊,谢谢

发表评论您的评论将提升作者分享的动力!快来评论一下吧!

用户名:
密 码:
内 容:
 

常见问答

技术分类

相关资源

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