Aide sur remplissage d'une combobox
Bonjour,
Citation:
J'ai deux combobox_filiere la 1er contient Filiere avec cette requette dans load de page
Code:
1 2 3 4 5
| Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim r = (From i In dc.FILIERE_SERIE _
Select i.FILIERE.FiliereNom).Distinct
ComboBox_filiere.DataSource = r
end sub |
Citation:
je voudrais remplaire la 2eme combobox avec :
chaque filiere contient plusieur serires
voila le deuxsieme code je les mis dans selectindexchanger combobox_filiere
Code:
1 2 3 4 5 6 7
| Private Sub ComboBox_filiere_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox_filiere.SelectedIndexChanged
Dim r = From fs In dc.FILIERE_SERIE _
Where fs.FiliereId = CInt(ComboBox_filiere.Text) _
Select fs.SERIE.SerieNom
ComboBox_niveaux.DataSource = r
end sub |
une aide