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

Pourquoi ne pas filtrer directement dans ta query ?


Datatunning (Bruno)

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

tu filtre dans ta requete tel que :

select * from table where agedude < 20

et c'est reglé (rapide et simple)



Datatunning (Bruno)

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

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

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