I am looking up the first record in a list that is sorted by date, but
it doesn't always return the next record in the list. Here is the
code:

Dim NextHearing As String
Dim NextDate As Variant
NextDate = DFirst("[Defendant] & ', on ' & [HearingDate] & ' at ' &
[HearingTime]", "qryHearings")

MsgBox "Your next hearing is for " & NextDate

Please tell me how to modify this so it always shows the next record
in the database sorted by date.
Thanks
John King
john (AT) sawtoothrecovery (DOT) com

"JKRoyal" <john (AT) sawtoothrecovery (DOT) com> wrote

DFirst returns the 1st record it finds. Assuming qryHearings is sorted,
DFirst will return the same record as the 1st record displayed when you open
the query directly. If qryHearings is not sorted, DFirst will return
whatever happens to be the 1st record returned by the query. Not knowing
what you are trying to accomplished, you could open a record set on
qryHearing and use movefirst and movenext to scroll though the records in
your code.