access开发平台--删除数据后定位返回至下一条数据状态的方法-麥田专栏

学过平台的学员或者网友朋友,都知道在报销教程第四章学过修好后,数据返回至修改的那一条数据状态的功能,这一功能对数据表里面有成千上百的数据来说非常管用,但删除功能还没有到达这个要求,删除后,记录立马就定位到最上面了,要找当时删除的哪一条还得拖动鼠标滚轴再找一会才能找到,问能不能实现与修改类似的,即删除后数据定位到删除的下一条或者上一条.

解决方法:

用报销教程里面的删除测试,请打开你的报销教程里面员工姓名主窗体,即frmyg_child

进入该窗体代码区,找到下面一段

Public Sub btnDel()
    If MsgBox("您确认要删除吗?", vbYesNo + vbInformation, Forms!usysfrmLogin.Caption) = vbYes Then
        DoCmd.Echo False
        Call AccHelp_DeleteFldstrRow("tblCodeyg", "ygId", selectstr)
        Forms!usysfrmMain!frmChild.SourceObject = "frmyg_child"
        DoCmd.Echo True
    End If
End Sub

将里面的 Forms!usysfrmMain!frmChild.SourceObject = "frmyg_child" 这一句代码注释或者删除掉,然后保存在点击平台的删除功能

看一下是不是返回到被删除记录的下一条了.