Office中国论坛/Access中国论坛

标题: [已解决] 删除子窗体记录后光标怎样回到上一条记录?? [打印本页]

作者: jicheng 时间: 2008-3-26 10:35
标题: [已解决] 删除子窗体记录后光标怎样回到上一条记录??
怎样使删除后光标转到上一条记录, 即删除第10条记录,然后光标转到第9条??

[ 本帖最后由 cuxun 于 2008-3-26 21:36 编辑 ]

作者: jicheng 时间: 2008-3-26 11:03
获取记录号:
Dim rst
Dim lngNumRecords As Long
Dim lngCurrentRecord As Long
Dim strTmp As String

Set rst = Me.RecordsetClone 'sdf = Me.收款2z.Form.RecordsetClone.RecordCount
rst.MoveLast
rst.Bookmark = Forms![表号设置]![分表号查询子窗体].Form.Bookmark
lngNumRecords = Forms![表号设置]![分表号查询子窗体].Form.RecordsetClone.RecordCount
lngCurrentRecord = rst.AbsolutePosition + 1
' MsgBox ">>总" & lngNumRecords & "条的第" & lngCurrentRecord & "条"

'就是不知道怎样定位到上一条记录号?用下面命令也不行
DoCmd.GoToRecord acDataForm, "Forms![表号设置]![分表号查询子窗体]", acGoTo, lngCurrentRecord-1

[ 本帖最后由 jicheng 于 2008-3-26 11:05 编辑 ]

作者: kangking 时间: 2008-3-26 11:21
应该没有这么复杂,记录删除后指针就定位到下一条记录,你只要再move一下就可以的.(这只是设想)

作者: jicheng 时间: 2008-3-26 12:01
就是不知道怎样移动到某条记录上

作者: jicheng 时间: 2008-3-26 15:23
[:50] [:50] [:50]

作者: leijiqiang 时间: 2009-9-26 13:59
学习学习

作者: kongtou 时间: 2010-12-8 15:10
不用sql语句，如何在窗体上用按钮删除光标所在行记录，我用按钮向导做了删除功能，删除的不是光标所在行，删掉了第一行。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)