Bonjour j ai une table qui contient plusieurs code postal ainssi que la localite et je voudrais mettre ces informations dans deux combo.box une pour les codes et l autre pour les localité j ai essayé de cette manière mais sans succés:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Do Until data_cp.Recordset.EOF
 
 
        ReDim Preserve int_cp(1 To i), str_localite(1 To i)
        int_cp(i) = data_cp.Recordset.Fields("Code")
        str_localite(i) = data_cp.Recordset.Fields("Localite")
        i = i + 1
        data_cp.Recordset.MoveNext
 
    Loop
merçi d avance