[VB.NET] affichage de données dans un combobox

Version imprimable

22/02/2006, 09h30
lou87

[VB.NET] affichage de données dans un combobox

Bonjour !

J'affiche certaine données dans un combobox (cellule esclave) à partir d'une autre cellule combobox (je vais l'apellez cellule maître), jusque là tout fonctionne...

Mais le problème c'est que la liste de données ne se vide pas, bien que j'ai essayer de le réinitialiser à chaque fois que je change de donnée dans la cellule maître.... Donc cela fait que les données s'ajoute les unes aux autres mélangeant ainsi les données, tout en faussant la cellule esclave...

(Je débute un peu dans ce langage)

ex : je clic sur la liste déroulante de la cellule maître nommé type puis sur ARBRE
donc dans la cellule esclave il a donc tout les type d'ARBRE
Puis je reviens sur la cellule maître et je clic sur FLEUR, et dans la cellule esclave je me retrouve avec le type ARBRE et le type FLEUR, alors que normalement je ne devrais qu'y retrouver uniquement le type FLEUR
22/02/2006, 09h41
m-mas

il faut utiliser la propriété clear de ta combo escalve ensuite la remplir de nouveau.
fait voir le code.

Le voila le code, mais j'ai enlevé les expressions... (disons que je bosse pour une entreprise...)

Code:

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
If listder_type_incident.SelectedItem = "*" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
        ElseIf listder_type_incident.SelectedItem = "**" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
        ElseIf listder_type_incident.SelectedItem = "***" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
        ElseIf listder_type_incident.SelectedItem = "****" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
        ElseIf listder_type_incident.SelectedItem = "*****" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
        ElseIf listder_type_incident.SelectedItem = "******" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
        ElseIf listder_type_incident.SelectedItem = "*******" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
        ElseIf listder_type_incident.SelectedItem = "********" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
        ElseIf listder_type_incident.SelectedItem = "*********" Then
            Me.listder_classif1.Text = ""
            Me.listder_classif1.Items.AddRange(New Object() {"expression"})
End If

* c'est ce qui se trouve dans la cellule maître

22/02/2006, 10h10
HULK
juste avant ton code ou tu rempli ta combobox esclave, tu ajoute cette ligne :
Code:

1 2 comboboxesclave.items.clear()
22/02/2006, 10h25
lou87

Merci beaucoup :D

Ca marche maintenant ^^