[VBA Access] huidige record en totaal aantal records

[Carpenter]

Beste mensen,

Ik heb een scriptje gemaakt om onder in het formulier het huidige record en het totaal aantal records weer te geven (zie code). Alleen als ik het formulier 'opstart' dan staat er 'Record 1 van 1' terwijl er meerdere records zijn. Als ik vervolgens naar een ander record ga dan staat er wel bijv. 'Record 1 van 10'. Hoe kan ik er voor zorgen dat bij het opstarten van het formulier er direct het totaal aantal records staat?

Visual Basic:

Private Sub Form_Current()
    If Me.NewRecord Then
        Me!lblNavigate.Caption = "Nieuw Record"
    Else
        With Me.RecordsetClone
            .Bookmark = Me.Bookmark
            Me!lblNavigate.Caption = "Record " & Me.CurrentRecord & _
            " van " & .RecordCount
        End With
    End If
End Sub

[farlane]

Zoek eens op 'recordcount' op dit forum, want dat heb je volgens mij nog niet gedaan.

[Masch]

.MoveLast

[GigaDave56]

Moet je niet eerste een .MoveLast doen om die .Count te refreshen / updaten?

[ Voor 33% gewijzigd door GigaDave56 op 13-11-2003 15:31 . Reden: Net niet snel genoeg... ]

[Carpenter]

Thanks guys, jullie hebben helemaal gelijk

[farlane]

Misschien is het wel aardig om even te timen hoeveel een MoveLast / MoveFirst kost ten opzichte van een COUNT(....) query.