count number of records on form using text box

[tweety]

is there a way of counting the amount of records available in a form and to display them on in text box, e.g 5 of 12



there is the record selector by default at the bottom of the form but as it comes with limited button such create next and forward record i chosen not to use that, and added my own buttons

thanks

[orange]

A form is a method to display data from tables or queries.
You can use a Select query or a DCount function to determine the number of records in your recordset.
You can keep your own counter to identify which record of the recordset, you are currently working wth.

[Missinglinq]

For Label

First you have to force Access to load the entire RecordSet, something the Access Gnomes don't always do when a Form first opens:

Private Sub Form_Load()
  DoCmd.GoToRecord , , acLast
  DoCmd.GoToRecord , , acFirst
End Sub

Then to update the count as you move from Record-to-Record:

For a Label

Private Sub Form_Current()
  Me.LabelName.Caption = "Record  " & CurrentRecord & "  Of  " & RecordsetClone.RecordCount & "  Records"
End Sub

Actually, instead of using a separate Label and Me.LabelNameCaption, I usually use Me.Caption, which places the count in the very top of the Form itself, ala

Record 1 of 300 Records

If you also want a Form Name up there you could simply combine the two:

Me.Caption = "The Yada Yada Form " & "Record " & CurrentRecord & " Of " & RecordsetClone.RecordCount & " Records"

For Textbox

Private Sub Form_Current()
  Me.TextboxName = "Record  " & CurrentRecord & "  Of  " & RecordsetClone.RecordCount & "  Records"
End Sub

Linq ;0)>