Trouver la plus grande valeur
Résolu/Fermé
milexarc
Messages postés
92
Date d'inscription
lundi 25 février 2013
Statut
Membre
Dernière intervention
2 décembre 2016
-
24 oct. 2014 à 17:59
milexarc Messages postés 92 Date d'inscription lundi 25 février 2013 Statut Membre Dernière intervention 2 décembre 2016 - 24 oct. 2014 à 23:43
milexarc Messages postés 92 Date d'inscription lundi 25 février 2013 Statut Membre Dernière intervention 2 décembre 2016 - 24 oct. 2014 à 23:43
A voir également:
- Trouver la plus grande valeur
- Trouver adresse mac - Guide
- Trouver un lieu avec coordonnées gps - Guide
- Trouver le propriétaire d'un numéro de téléphone gratuitement ✓ - Forum Mobile
- Trouver une adresse avec un nom de famille gratuit ✓ - Forum Mobile
- Où trouver l'autorité de délivrance ? ✓ - Forum Vos droits sur internet
2 réponses
Labrevert
Messages postés
35
Date d'inscription
mercredi 27 février 2013
Statut
Membre
Dernière intervention
21 décembre 2015
14
24 oct. 2014 à 18:20
24 oct. 2014 à 18:20
Bonjour je ne suis pas familier de ce langage mais tu peux essayer de comparer l'un face à l'autre du type :
if
1>2 and 1>3
then
1 est la plus grande
esle
if
2>1 and 2>3
then
2 est la plus grande
else
if
3>1 and 3>2
then
3 est la plus grande
Bonne continuation
if
1>2 and 1>3
then
1 est la plus grande
esle
if
2>1 and 2>3
then
2 est la plus grande
else
if
3>1 and 3>2
then
3 est la plus grande
Bonne continuation
milexarc
Messages postés
92
Date d'inscription
lundi 25 février 2013
Statut
Membre
Dernière intervention
2 décembre 2016
8
24 oct. 2014 à 18:34
24 oct. 2014 à 18:34
cela ne fonctionne pas.
Textbox1 = 5
Textbox2 = 60
Textbox3 = 7
il me met que c'est la textbox3 ...
Textbox1 = 5
Textbox2 = 60
Textbox3 = 7
il me met que c'est la textbox3 ...
Labrevert
Messages postés
35
Date d'inscription
mercredi 27 février 2013
Statut
Membre
Dernière intervention
21 décembre 2015
14
24 oct. 2014 à 18:36
24 oct. 2014 à 18:36
Désolé
24 oct. 2014 à 20:03
Dim bc As String
Dim ac As String
ab = textbox1.Text
bc = textbox2.Text
ac = textbox3.Text
if ab > ac and ab > bc then
Label4.text = "AB est le plus grand côté"
if bc > ac and bc > ab then
Label4.text = "BC est le plus grand côté"
if ac > bc and ac > ab then
Label4.text = "AC est le plus grand côté"
merci de ton aide !
24 oct. 2014 à 20:27
Or la comparaison des chaines se fait sur le code ASCII de chaque caractères ; ce n'est pas la valeur numérique .
Exemple "2" est > à "11" en terme de chaine de caractères.
Donc d'abord déclarer ab, bc et ac comme nombres entiers par exemple.
Dim ab As Integer
Dim bc As Integer
Dim ac As Integer
Ensuite on affecte les valeur numériques des textbox aux variables grace à la fonction Val()
ab = Val( textbox1.Text)
bc =Val( textbox2.Text)
ac =Val(textbox3.Text)
Enfin on fait la comparaison des valeurs numériques.
if ab > ac and ab > bc then
Label4.text = "AB est le plus grand côté"
if bc > ac and bc > ab then
Label4.text = "BC est le plus grand côté"
if ac > bc and ac > ab then
Label4.text = "AC est le plus grand côté"
24 oct. 2014 à 23:43