compter un nombre d'enregistrements dans une table

Question

Voici mon code, je cherche a inscrire dans une textbox lorsue je click sur un bouton le nombre de personnes ayant moins de 20 ans. Dans ma table j'ai un numeroAuto comme clef, un nom et un age.

Est ce que quelqun peut me dire pourquoi ca marche pas.

Private Sub Commande8_Click()
    Dim nbre As Integer
    Dim i As Integer
    
    With Form_Table1
    
        donnee = 0
        i = 0
        For i = 1 To 6
            'Voici le nom du champs age de ma table
            If .AgeDude < 20 Then
                 nbre = nbre + 1
            End If
        Next i
        .efPlusPetit = nbre
    End With
End Sub

datatunning · Answer

Pourquoi ne pas filtrer directement dans ta query ?

Datatunning (Bruno)

Morgoth666 · Answer

comment ça ?
Mais toi est ce que tu trouve quelque chose de bizarre dans mon code.

datatunning · Answer

tu filtre dans ta requete tel que :

   select * from table where agedude < 20

et c'est reglé (rapide et simple)

Datatunning (Bruno)

Morgoth666 · Answer

Je suis daccord avec toi mais j'aimerai quand meme le faire avec le code, normalement ca devrait marcher.

letoiia · Answer

Letoiia

a priori dans ta boucle tu oubli de passé à l'enregistrement suivant.

il compare donc toujours le premier enregistrement. ce qui explike ke ne doit pas avoir le bon résultat en cortie.

Cordialement

Morgoth666 · Answer

Je m'en suis rendu compte. je l'ai fait et ca marche.
J'ai vraiment la tete dans le ...
Merci quand meme

Compter un nombre d'enregistrements dans une table

6 réponses

Discussions similaires