Utilisation des combo

J'ai un petit bemol avec les Combo:j'ai crée Trois Combos dans

Code:

---

1 2 3 4 5 6 7 8 9 10 11

private Sub Form_Load() Combo1.AddItem "Occupation" Combo1.AddItem "Voiture" Combo1.AddItem "Avion"   Combo2.AddItem "Poisson" Combo2.AddItem "Viande" Combo2.AddItem "Saule"   Combo3.AddItem "Oui" Combo3.AddItem "Non"

---

Tout ça fonctionne correctement mais qd je fais:

Code:

---

1 2	If Combo1.Text="Occupation" And Combo2.Text="Poisson" Then Combo3.Enable=False End If

---

ça ne marche pas, je ve cre des événements c'est à dire selectionné une valeur dans une liste et désactiver une autre liste au meme moment.
Aider moi s'il vous plait.

Salut,

Ce que tu peux faire pour cela est de te créer un évènement pour chacun de tes combos qui devront "Handler" le changement d'Index de tes combos.

bonne chance!

Citation:

---

Envoyé par toutemes1

Code:

---

1 2	If Combo1.Text="Occupation" And Combo2.Text="Poisson" Then Combo3.Enable=False End If

---

---

Dans ce code, le End If est en trop car tu donnes la definition du Then sur la meme ligne.

Citation:

---

Envoyé par Danyel

Dans ce code, le End If est en trop car tu donnes la definition du Then sur la meme ligne.

---

Certes, mais ce n'est pas avec ceci qu'un tel code fonctionnera. Il faut, comme le suggère phfle1, effectuer les contrôles sur les éléments des comboboxes sélectionnés au moment ou ceux ci sont sélectionnés.

Dans des méthodes du type :

Code:

---

Private Sub mySub(Byval sender as object, Byval e as EventArgs) Handles myCombobox.SelectedIndexChanged

---

Si tu utilises les combobox du framework, pour ajouter un élément, c'est comme ceci :

Code:

---

ComboBox1.Items.Add("Occupation")

---

Et la propriété pour désactiver un champ, c'est Enabled et non Enable

Voici un exemple :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load ComboBox1.Items.Add("Occupation") ComboBox1.Items.Add("Voiture") ComboBox1.Items.Add("Avion")   ComboBox2.Items.Add("Poisson") ComboBox2.Items.Add("Viande") ComboBox2.Items.Add("Saule")   ComboBox3.Items.Add("Oui") ComboBox3.Items.Add("Non") End Sub   Private Sub DisableFields() If ComboBox1.Text = "Occupation" And ComboBox2.Text = "Poisson" Then ComboBox3.Enabled = False End Sub   Private Sub ComboBox_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox2.SelectedIndexChanged, ComboBox1.SelectedIndexChanged DisableFields() End Sub End Class

---