Bonjours


J'ai actuellement un probleme que je ne comprend pas . je dois allimenter plusieur combox box au chargement mais voila que lors de mon chargement celui-ci n'aliment q'un seul combobox le premier actionée . voici mon code du chargement .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
 
 
 Private Sub FrmRecherche_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        PnlAjout.Visible = False
        PnlSupprimer.Visible = False
        PnlModif.Visible = False
        PanelDevis.Visible = False
        PanelCache.Visible = True
 
 
 
        DgPieceOccasionTableaux.DataSource = macnx.Executer_Requete_Select("select idmateriel,NomMateriel,PrixMateriel,Quantiter,numeroCategories,Reference,numeromarque from marque,materielocass,categoriemateriel where (materielOcass.numeroCategories=categoriemateriel.NumeroCategorie) and (materielOcass.numeromarque=marque.idMarque) order by idmateriel asc", "Toutmateriel")
 
 
 
 
        CbMarqueDetailler.DataSource = macnx.Executer_Requete_Select("select nomMarque from marque", "aa")
        CbMarqueDetailler.DisplayMember = "nomMarque"
        CbMarqueDetailler.ValueMember = "idmarque"
 
 
        CbCategorieDetailler.DataSource = macnx.Executer_Requete_Select("SELECT NomCategorie FROM categoriemateriel", "gb")
        CbCategorieDetailler.DisplayMember = "NomCategorie"
        CbCategorieDetailler.ValueMember = "NumeroCategorie"
 
 
 
        CbCategorieMaterielAjout.DataSource = macnx.Executer_Requete_Select("SELECT NomCategorie FROM categoriemateriel", "hb")
        CbCategorieMaterielAjout.DisplayMember = "NomCategorie"
        CbCategorieMaterielAjout.ValueMember = "NumeroCategorie"
 
        CbCategorieModif.DataSource = macnx.Executer_Requete_Select("SELECT distinct numeroCategorie,NomCategorie FROM categoriemateriel", "lo")
        CbCategorieModif.DisplayMember = "nomcategorie"
        CbCategorieModif.ValueMember = "numeroCategorie"
 
        Rafraichir()
 
        DgPieceOccasionTableaux.Columns(5).Visible = False
        DgPieceOccasionTableaux.Columns("IdMateriel").Visible = False
        DgPieceOccasionTableaux.Columns("NomMateriel").HeaderText = "Nom"
        DgPieceOccasionTableaux.Columns("PrixMateriel").HeaderText = "Prix"
        DgPieceOccasionTableaux.Columns("Quantiter").HeaderText = "Qte"
        DgPieceOccasionTableaux.Columns("NomCategorie").HeaderText = "Catégorie"
 
        DgPieceOccasionTableaux.Columns("reference").HeaderText = "Reference"
 
    End Sub
j'espere que vous pourrez m'aider ...