Thanks plog, you lead me down the right path. I'm posting the code i came up with here if anyone want it for future reference:
maxdate = DMax("TestDate", "tblcal")
lastcal = DLookup("CalPoint1", "tblCal", "testdate=#" & Format(maxdate, "mm/dd/yyyy") & "#")
Me.LastCalText.SetFocus...