Combobox: Remplissage + calculRésolu

Question

Bonjour a tous J'aurai besoin d'un peu d'aide ! J'ai créé une combobox que je désirerai remplir par des valeurs allant de 100 a 10. En gros j'ai: For i = 100 to 0 Step -10 * Next Il me manque en fait la formule de remplissage (a noter que je suis sous Visual Studio 2005) Est ce un truc du genre: .additem.... Si oui il me manque la suite -_- D'autre part je voudrais enuite que la valeur saisie dans la combobox soit utilisé dans un calcul Par exemple VariableX = 2450 * Merci de votre aide !

cs_Exploreur · Accepted Answer

Salut,

Pourtant il y a l'aide en ligne...ou la MSDN de Microsoft....lol...

For i = 100 to 0 Step -10
ComboBox1.Items.Add i
Next

A+
Exploreur

 Linux a un noyau, Windows un pépin

cs_Exploreur · Answer

Pour le reste :

Private Sub Button_Click()
Dim sVar As String
sVar = ComboBox1.Text ' pas sûr de cette syntaxe en .net
Msgbox sVar
End Sub

A+
Exploreur

 Linux a un noyau, Windows un pépin

Thlb · Answer

Tout marche impec ! 

Merci beaucoup !

Thlb · Answer

A peine ce probleme résolu qu'il m'en arrive un autre :D (le relou celui la je vous jure )

Dans mon programme j'utilise 3 textbox. Et un calcul se sert des valeurs des 3.

Cepandant dans ce programme je suis ammené a resaisir un certain nombre de fois des valeurs, mais pas forcément dans les 3.

Or si la textbox est vide, fatalement ca ne peut pas calculer --> erreur
En gros il faudrait mettre automatiquement 0 qd on ne vx pas se servir de la valeur.

Y a t'il un moyen pour que quand la textbox est vide, elle soit considéré comme ayant une valeur a 0

J'ai essayé de bidouiller mais sans succes :s

cs_Exploreur · Answer

Re,

Un test sur ce que contient TextBox, annalyse et comprend :

Private Sub Button_Click()If TextBox1.Text VbNullString Then TextBox1.Text "0"
End Sub

A+
Exploreur

 Linux a un noyau, Windows un pépin

Kristof_Koder · Answer

Exploreur < peut-être plutôt ca non ?
Private Sub Button_Click()
If TextBox1.Text "" Then TextBox1.Text "0"
End Sub

cs_Exploreur · Answer

Salut Kristof_Koder,

Ben cela fonctionne aussi avec VbNullString(="")...

A+
Exploreur

 Linux a un noyau, Windows un pépin

Combobox: Remplissage + calcul

7 réponses

Votre réponse

Discussions similaires