salut,

donc j'ai un problème pour charger une combobox à partir du résultat d'une combobox précédente :

donc en gros j'ai une combobox qui s'appelle ComboBoxAgInt que je charge depuis un dataset bon jusque la tout va bien.

mais après avec le résultat de cette combobox je dois pouvoir charger une autre combobox qui s'appelle ComboBx_Interimaire et c'est la que le problème arrive.

je crée l'évènement Private Sub ComboBoxAgInt_SelectedValueChanged et je met mon code comme sa vous vous ferez une idée :

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
Private Sub ComboBoxAgInt_SelectedValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBoxAgInt.SelectedValueChanged
 
                    Dim entreprise As New Mylist
            entreprise = Me.ComboBoxAgInt.SelectedItem
 
 
            Me._taAgenceInt.FillBy_Age_id(DataSetOrdreDeMission.Agence_Interimaire, entreprise.ItemData)
            Dim coefDel As DataTable = _taAgenceInt.GetDataBy_Age_id(entreprise.ItemData)
 
            TxtBxCoefDel.Text = coefDel.Rows(0)("AGE_COEF_DELEGATION")
            TxtBxCoefdeGest.Text = coefDel.Rows(0)("AGE_COEF_GESTION")
 
            Me._taPersonne1.FillBy_interimaire(DataSetOrdreDeMission.Personne1, entreprise.ItemData)
            Dim Donneespersonne As DataTable = _taPersonne1.GetDataBy_interimaire(entreprise.ItemData)
            Me.ComboBx_Interimaire.Items.Add(New Mylist("", 0))
            For Each Personne As DataRow In Donneespersonne.Rows
                Dim Itemlist As New Mylist
                Itemlist.Name = Personne("pers_nom")
                Itemlist.ItemData = Personne("pers_id")
                Me.ComboBoxAgInt.Items.Add(Itemlist)
            Next        
 
    End Sub