Trouver un plus petit nombre

Question

Voilà, je voulais savoir comment on faisait pour trouver le plus petit chiffre parmi un recordset et l'afficher dans une textbox indépendante.
Merci

econs · Answer

Ben je crois qu'il n'y a pas de miracle. Tu parcours toutes les données du recordset :

minimum_trouve = premiere_donnee

Pour chaque donnee [

If donnee < minimum_trouve Then
minimum_trouve=donnee
End If
]

Manu

Morgoth666 · Answer

Merci de m'avoir répondu mais lorsue je fais ca meme en parcourant le recordset entier il me sort le premier!

KC62 · Answer

Slt ! 

Alors c'est que le premier est le plus petit !
mais sinon tu peu utilisé la fonction MIN du SQL ! 
je sais pas sur quel champ tu travaille mais admettons que l'on nomme celui-ci CHAMPS1
sa donnerais SELECT MIN(Champs1) FROM TABLE1
Bien sur cette solution ne peut correspondre a un recordset mais sur nimporte quel base sa marche ! 

O pire mais ici ton code car il est étrange qu'il prenne le premier si celui-ci n'est pas le plus petit...

KC62

On a pas toutes les solutions de tous les probleme mais chaque probleme à ses solutions ...

Morgoth666 · Answer

Voici mon code

Private Sub Commande8_Click()
    Dim petit, i, nbreDeDonnée As Integer
    
    With Form_Table1
    'je travaille sur des ages de personnes
        petit = .AgePersonne
        For i = 0 To nbreDeDonnée
            If .AgePersonne < petit Then
                petit = .AgePersonne
            End If
        Next
        .efPlusPetit = petit
        'ceci est la textbox
    End With
End Sub

ld40 · Answer

t'aurais pas oublié de calculer nbreDeDonnée?

Morgoth666 · Answer

JE SUIS VRAIMENT TROP ...

Merci beaucoup, c'est une honte de ma part!!!

KC62 · Answer

sa arrive Morgoth666 sa arrive ... 

On a pas toutes les solutions de tous les probleme mais chaque probleme à ses solutions ...

Trouver un plus petit nombre

7 réponses

Discussions similaires