Procedure MoveBy( PositionNumbers : Integer )
Description
Repositions the record pointer a number of positions.
Example
Sub Main()
' Create a new query in the active database
Dim
Query
' Request a new query in the active database
Set
Query application.DataBase.CreateQueryDef("
Select CountryCode from Country
")
' Position the record pointer on the first record
Query.First
' Reposition the record pointer 10 positions forward
Query.MoveBy(10)
' Show the value of the field in a message box
MsgBox
Query("
CountryCode
")
Query.Close
End Sub