ms access 2003导航到记录的绝对位置

Question

我想通过在文本框中输入记录绝对位置来导航到表单上的记录。到目前为止悲惨的失败。谁能告诉我怎么做？

Answer 1

您可以使用记录集或记录集克隆：

Set RS = frm.RecordsetClone
''Populate recordset
RS.MoveLast
RS.MoveFirst

If lngRecNo = 0 Or lngRecNo > RS.RecordCount Then
    MsgBox "Cannot go to the specified record." & vbCrLf _
    & "Please try again."
Else
    ''Counting from zero
    RS.AbsolutePosition = lngRecNo - 1
    frm.Bookmark = RS.Bookmark
End If