OVH Cloud OVH Cloud

Arrondi dans un label

4 réponses
Avatar
Florian
Bonjour
j'ai un textbox "Txt_résultat" dans lequel je saisi un résultat avec parfois
2 décimales.
Dans le "Lbl_résultat" j'ai le résultat d'un calcul.
Le pb est qu'il faut que :

If Txt_résultat = Lbl_résultat_caché Then
msgbox "c'est juste !"
A cause du non arrondi, c'est souvent pas juste.
Comment faire afin de trouver le format arrondi pour le label ?
Merci
Flo riant

4 réponses

Avatar
John Fuss
Round(TaValeur, NbrDécimales)

exemple :

Round(8.5487, 2) => 8.55

John

si ta varible est de format String utilise Val(TaVariable) pour utiliser
Round().


"Florian" a écrit dans le message de
news:
Bonjour
j'ai un textbox "Txt_résultat" dans lequel je saisi un résultat avec
parfois

2 décimales.
Dans le "Lbl_résultat" j'ai le résultat d'un calcul.
Le pb est qu'il faut que :

If Txt_résultat = Lbl_résultat_caché Then
msgbox "c'est juste !"
A cause du non arrondi, c'est souvent pas juste.
Comment faire afin de trouver le format arrondi pour le label ?
Merci
Flo riant




Avatar
Florian
Bonjour John

En fait c'est cela que j'essaie d'adapter :

frm_table.Lbl_résultat_caché.Caption = Lbl_table_de / Lbl_alea
avoir dans le résultat un arrondi avec 2 décimales
frm_table.Lbl_résultat_caché.Caption = (round(Lbl_table_de / Lbl_alea;2)

Cela ne fonctionne pas

Flo riant

"John Fuss" a écrit dans le message de
news:cb66k4$nv3$
Round(TaValeur, NbrDécimales)

exemple :

Round(8.5487, 2) => 8.55

John

si ta varible est de format String utilise Val(TaVariable) pour utiliser
Round().


"Florian" a écrit dans le message de
news:
Bonjour
j'ai un textbox "Txt_résultat" dans lequel je saisi un résultat avec
parfois

2 décimales.
Dans le "Lbl_résultat" j'ai le résultat d'un calcul.
Le pb est qu'il faut que :

If Txt_résultat = Lbl_résultat_caché Then
msgbox "c'est juste !"
A cause du non arrondi, c'est souvent pas juste.
Comment faire afin de trouver le format arrondi pour le label ?
Merci
Flo riant








Avatar
John Fuss
A essayé :

Round(val(Lbl_table_de / Lbl_alea);2) ou
Round(CDbl(Lbl_table_de / Lbl_alea);2)

John

"Florian" a écrit dans le message de
news:
Bonjour John

En fait c'est cela que j'essaie d'adapter :

frm_table.Lbl_résultat_caché.Caption = Lbl_table_de / Lbl_alea
avoir dans le résultat un arrondi avec 2 décimales
frm_table.Lbl_résultat_caché.Caption = (round(Lbl_table_de / Lbl_alea;2)

Cela ne fonctionne pas

Flo riant

"John Fuss" a écrit dans le message de
news:cb66k4$nv3$
Round(TaValeur, NbrDécimales)

exemple :

Round(8.5487, 2) => 8.55

John

si ta varible est de format String utilise Val(TaVariable) pour utiliser
Round().


"Florian" a écrit dans le message de
news:
Bonjour
j'ai un textbox "Txt_résultat" dans lequel je saisi un résultat avec
parfois

2 décimales.
Dans le "Lbl_résultat" j'ai le résultat d'un calcul.
Le pb est qu'il faut que :

If Txt_résultat = Lbl_résultat_caché Then
msgbox "c'est juste !"
A cause du non arrondi, c'est souvent pas juste.
Comment faire afin de trouver le format arrondi pour le label ?
Merci
Flo riant












Avatar
Florian
Re, John

J'ai essayé cela sans succés. Cela plante

frm_table.Lbl_résultat_caché.Caption = Round(val(Lbl_table_de / Lbl_alea);2)

Merci

"John Fuss" a écrit dans le message de
news:cb6cq8$rr9$
A essayé :

Round(val(Lbl_table_de / Lbl_alea);2) ou
Round(CDbl(Lbl_table_de / Lbl_alea);2)

John

"Florian" a écrit dans le message de
news:
Bonjour John

En fait c'est cela que j'essaie d'adapter :

frm_table.Lbl_résultat_caché.Caption = Lbl_table_de / Lbl_alea
avoir dans le résultat un arrondi avec 2 décimales
frm_table.Lbl_résultat_caché.Caption = (round(Lbl_table_de / Lbl_alea;2)

Cela ne fonctionne pas

Flo riant

"John Fuss" a écrit dans le message de
news:cb66k4$nv3$
Round(TaValeur, NbrDécimales)

exemple :

Round(8.5487, 2) => 8.55

John

si ta varible est de format String utilise Val(TaVariable) pour
utiliser



Round().


"Florian" a écrit dans le message de
news:
Bonjour
j'ai un textbox "Txt_résultat" dans lequel je saisi un résultat avec
parfois

2 décimales.
Dans le "Lbl_résultat" j'ai le résultat d'un calcul.
Le pb est qu'il faut que :

If Txt_résultat = Lbl_résultat_caché Then
msgbox "c'est juste !"
A cause du non arrondi, c'est souvent pas juste.
Comment faire afin de trouver le format arrondi pour le label ?
Merci
Flo riant