Article ID: 133243
Article Last Modified on 2/15/2000
THISFORM.FirstRecord = RECNO()
Do CASE
CASE LASTKEY() = 5 AND THISFORM.FirstRecord = RECNO()
=MESSAGEBOX("You're on the first record of the grid")
CASE LASTKEY() = 24 AND THIS.ActiveRow = RECCOUNT()
=MESSAGEBOX("You're on the last row of the grid")
ENDCASE
Additional query words: VFoxWin
Keywords: KB133243