Discussion :

[Phoenix2025]

Voila boujour à ceux qui vont m'aider et aux autres.

J'essai de developper une application pour pda sous vb avec vs 2008

dans ce programme j'ai 2 combobox, mais je n'arrive pas à récupérer leur valeur dans une boucle if.

j'ai pour le moment ceci que j'ai trouver sur internet

Code :

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

1
2
3
If (combobox1.SelectValue = 1) then 
action
end if

Mais cela ne fonctione pas du tous.

merci de votre aide

[rochdi123]

si votre combobox n'est pas liées à une source de donnée,
vous devez utiliser combobox1.selectedItem
car le selectedvalue est utilisée en premier cas

[Phoenix2025]

quand je met ceci

Code :

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

if combobox1.selectedItem = 1 then

j'ai ce message :

la conversion de la chaine "nom de la chaine" en type double n'est pas valide

Sachant qu'au final j'aimerais tester cela pour plusieurs ligne

Code :

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

1
2
3
4
5
6
if combobox1.selectedItem = 1 then 
  if combobox2.selectedItem = 1 then 
 
 
if combobox1.selectedItem = 2 then 
if combobox2.selectedItem = 1 then

[rochdi123]

est ce que tu veux dire par selecteditem l'indice de l'élément sélectionné ?
non c pas ça, si tu veux tester par l'indice tu dois utiliser selectedIndex,et dans ce cas l'indice du premier élément est 0 et n'est pas 1 .
si non, pour récupérer l'élément selectionné tu utilise selecteditem

[Sankasssss]

MSDN est toujours la référence avec des exemples : http://msdn.microsoft.com/fr-fr/libr....combobox.aspx
Sinon y'a aussi l'excellentissime Ph.Lasserre : http://plasserre.developpez.com/v3-7.htm
qui te dis ceci :

Comment récupérer la zone texte quand elle change ?

Elle est dans la propriété Text.

On utilise l'évènement TextChanged qui se déclenche quand le texte est modifié.

Code :

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

1
2
3
4
5
Private Sub ComboBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.TextChanged
 
        Label1.Text = ComboBox1.Text
 
End Sub

Bien à toi

[Phoenix2025]

C'est ok, j'ai trouvé comment faire, merci pour toutes vos aide bien pratique