RecordCount not working 2

[pmp1]

Hi!
I have reviewed the many other threads on RecordCount and have no reason to think my code should not work, however, it returns the incorrect answer.

Private Sub Form_Load()
  MsgBox(Str(Me.[ctrlPatientBrowser].Form.Recordset.RecordCount))
End Sub

ctrlPatientBrowser is a subform - datasheet
The answer I get is 501
Clicking on the vertical scroll bar shows "Record: 1 of 1134"
which is correct.
I am obviously missing something basic and would appreciate some help.
Thanking you
Peter

 

[PHV]

Seems that when the Form loads the subform hasn't read all the records yet.
You may try this:

Private Sub Form_Load()
With Me.[ctrlPatientBrowser].Form.Recordset
  .MoveLast
  MsgBox(Str(.RecordCount))
  .MoveFirst
End Sub

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[pjm]

http://support.microsoft.com/kb/105976

 

[pmp1]

Thank you to both PHV and pjm.
I will now also check microsoft for my answers first.
Regards
Peter