子窗体Requery之后，记录游标重新定位

盗梦 · 发表于 2014-10-20 12:28:18

本帖最后由盗梦于 2014-10-20 12:30 编辑

一般我们刷新子窗体之后，记录游标会跑到第一条。
如果我们的记录比较多，总是跑到第一条很不方便。
我们可以用下面的方法解决问题：

1、子窗体刷新之前，先记录一下当前记录的位置
Dim lngPostion As Long
lngPostion =  Me.FrmSub.Form.CurrentRecord '获取子窗体FrmSub当前记录的位置

2、子窗体刷新之后，重新定位当前记录的位置
Me.FrmSub.SetFocus                                        '先让子窗体获得焦点
Docmd.GotoRecord , , acGoTo, lngPostion    '根据前面记录的位置跳转到对应的位置

这样两步走，就可以实现子窗体Requery刷新数据之后，重新定位记录游标的位置

zpy2 · 发表于 2014-10-23 07:35:05

不错学习了

李力军2 · 发表于 2014-10-26 06:42:08

好，简单有效。

lxg315 · 发表于 2019-11-5 17:21:46

不错，谢谢

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 子窗体Requery之后，记录游标重新定位

群介绍
主题无相 (随机显示版	同地区群块其他地区)