Une fourchette de nombre (venez voir svp!)

z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 - 18 juil. 2003 à 10:15
z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 - 18 juil. 2003 à 11:16
Salut

Je voudrais savoir comment faire pour :

J'ai un Text1 avec un nombre inscrit à l'intérieur
J'ai un text2 avec un nombre inscrit a l'intérieur
J'ai un label

Je voudrais savoir comment faire pour que:
Si le texte1 est compris dans l'intervalle:
val(text2)-1<val(text2)<val(Text2)+1

Le label soit changé.

Ou si le text1 n'est pas dans cet interval, le label ne change pas...

J'espère que j'ia été clair...

Merci.

3 réponses

Utilisateur anonyme
18 juil. 2003 à 10:28
Salut,
C'est un peu confus ta question mais..
As tu éssayé:

if ((val(text2))-1) < (val(Text2))+1) then
label1.caption = "OK"
else
label1.caption = "NoOK"
end if
A+
0
cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
18 juil. 2003 à 11:09
Bonjour

Il faut tester les changements sur les 2 TextBoxes :

En supposant qu'au départ Label1 affiche "Dodo"

Private Sub Text1_Change()If Val(Text1) > Val(Text2) - 1 And Val(Text1) < Val(Text2) + 1 Then Label1.Caption "Coucou" Else Label1.Caption "Dodo"
End Sub

Private Sub Text2_Change()If Val(Text1) > Val(Text2) - 1 And Val(Text1) < Val(Text2) + 1 Then Label1.Caption "Coucou" Else Label1.Caption "Dodo"
End Sub
0
z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 2
18 juil. 2003 à 11:16
Merci les gars !
En fait je ne l'ai pas utilisé dans le programme que fais en ce moment, mais je suis sur que ca va me servir plus tard...
Merci bcp !
Voila !
0
Rejoignez-nous