Discussion :

[many6801]

Bonjour, j'ai beaucoup de comboBox qui contiennent des données provenant d'une table Access. Le problème, c'est que quand je mets à jour ma table en insérant, modifiant ou supprimant des données, j'aimerais mettre ces ComboBox à jour. J'ai fait tout un truc mais j'ai l'impression de me compliquer la vie c'est pourquoi je voulais vous demander afin de voir s'il n'y avait rien de plus simple.
J'ai essayé le Refresh() et le Update(), ça met les données à jour mais cela n'efface pas les anciennes. Merci d'avance.

[many6801]

J'ai une autre question, je voulais savoir comment il était possible de vérifier si le contenu de la combo est vide. Merci

[rydjel]

J'ai une autre question, je voulais savoir comment il était possible de vérifier si le contenu de la combo est vide. Merci

Dim vide As Boolean = False
If ComboBox1.Text = "" Then
vide = True

Else : vide = False
End If

Ensuite tu n'auras qu'a utiliser ton booléen pour tes traitements

[many6801]

Merci c'est nickel c'est exactement ce qu'il me fallait

[many6801]

Bon finalement, avec ta réponse c'est toujours considéré comme vide. Je vous explique mon problème :
Lorsque je remplis mes comboBox, je veux que quand elles ne sont pas vides, l'index se positionne au niveau 0 de façon à ce qu'il y ait d'office quelque chose d'écrit dedans.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim videP As Boolean = False
        If cboProduit.Text = "" Then
            videP = True
        End If
        If videP = False Then
            cboProduit.SelectedIndex = 0
        End If

Voila. Aidez moi SVP.

[rydjel]

Bon finalement, avec ta réponse c'est toujours considéré comme vide. Je vous explique mon problème :
Lorsque je remplis mes comboBox, je veux que quand elles ne sont pas vides, l'index se positionne au niveau 0 de façon à ce qu'il y ait d'office quelque chose d'écrit dedans.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim videP As Boolean = False
        If cboProduit.Text = "" Then
            videP = True
        End If
        If videP = False Then
            cboProduit.SelectedIndex = 0
        End If

Voila. Aidez moi SVP.

Ca devrait marcher mieux là
If cboProduit.Items.Count <> 0 Then


cboProduit.SelectedIndex = 0
End If