Comment mettre des valeurs dans une Liste déroulante?

Question

Bonjour à tous,

Je voudrais mettre dans la liste déroulante d'une form toutes les valeurs d'un champs de la BDD. Comment faire?

Ex: Mettre tous les Noms de la base dans COMBOBOX

Champs:     Nom          Prenom       Adresse
                  
                  Adam        Pierre         PARIS
                  Damien     Simon        TOULOUSE
                  ....            ....             ....

Merci beaucoup

cs_DARKSIDIOUS · Answer

Il faut pour cela passer par un contrôle Data ou DAO, puis utiliser soit des DBCombo soit des DataCombo selon la technologie utilisée, puis renseigner la propriété DataSource et ListField de ton contrôle Combo et charger ta table dans ton contrôle Data ou ADO.

DarK Sidious

[Responsable API/VB du site www.ProgOtoP.com]
Téléchargez ProgOtoP API Viewer

cs_ITALIA · Answer

Voila par exemple :
cocher avant le Référence Microsoft DAO 3.51 Object Library

Set db = OpenDatabase(AdresseBase)
Rq = "SELECT Nom, Prenom,Adresse  FROM NomDeBase "
Set Acces = db.OpenRecordset(Rq)
If Acces.RecordCount <> 0 Then
    Do Until Acces.EOF
        Combo1.AddItem Acces("Nom") & "  " & Acces("Prenom") & "  " & Acces("Adressse") 
    Acces.MoveNext
    Loop
End If
Set Acces = Nothing
Set db = Nothing

It@li@

rodryg · Answer

Merci, c'est parfait

Comment mettre des valeurs dans une Liste déroulante?

3 réponses

Discussions similaires