La declaration en vb6.0 me complique

ginongo -  
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   -
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 57 Date d'inscription   Statut Membre Dernière intervention   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 8724 Date d'inscription   Statut Contributeur Dernière intervention   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