La declaration en vb6.0 me complique

ginongo -  
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour,

Private Sub temp Changed(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles temp.TextChanged
Dim temp As Integer
If temp <= 0 Then
MsgBox("Bonjour à tous c'est de la glace")
ElseIf temp < 100 Then
MsgBox("Bonjour à tous c'est du liquide")
Else
MsgBox("Salut c'est de la vapeur")
End If
End
End Sub
il ne marche pas c'es toujours le 1 message qui apparait help pls

3 réponses

ee
 
peut etre c est probleme de fermeture if
0
lys44 Messages postés 59 Statut Membre 5
 
Hum... Dis moi, quand valorises-tu le temp ?
Car tu le déclares puis tu veux l'utiliser suivant une valeur qu'il devrait avoir, alors qu'entre les deux, tu n'as pas affecté de valeur à temp...

Il te faudrait quelque chose dans ce genre :

Dim temp As Integer

temp = MaTextBox.Text

If temp <= 0 Then
MsgBox("Bonjour à tous c'est de la glace")
ElseIf temp < 100 Then
MsgBox("Bonjour à tous c'est du liquide")
Else : MsgBox("Salut c'est de la vapeur")
End If

où l'utilisateur saisit par exemple la valeur dans une textbox...
0
lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Bonjour,
1°) Tu n'est pas en VB6.00 mais en VB.Net xxxx
2°) Tu valide Temps et ensuite tu le dimentionne... donc remise à 0
Inverse les deux 1ère lignes.
A+
0