Discussion :

[lulux80]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Select Case Me.txtnompiece.Text
...
   Case "Profil Carrés"
     txtresu.Text = (txtlarg.Text + txthaut.Text) * (comface.Text)
   Case "Profil Rond"
     txtresu.Text = (txtlarg.Text * comface.Text)
...
End Select

Alors voilà, j'ai ça et quand je rentre des chiffres, exemple :

txtlarg = 100
txthaut = 100
comface = 2

ça devrai me faire (100 + 100) donc 200
200 * 2 = 400

Vous etes d'accord avec moi, je suis pas fou...

Bah en vb, ça me donne 100 + 100 * 2 = 200200

Si quelqu'un peux m'éclairer SVP

[Invité]

Bonjour

Tu concatène du texte, convertit les données de tes textbox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
 
Case "Profil Carrés"
     txtresu.Text = (cdbl(txtlarg.Text) + cdbl(txthaut.Text)) * cdbl((comface.Text))
   Case "Profil Rond"
     txtresu.Text = (cdbl(txtlarg.Text) * cdbl(comface.Text))

pas testé
Starec

[lulux80]

Et pour avoir 3 chiffres après la virgule derrière quoi qu'il arrive...
(100+100)*2 = 400.000


PS : Merci Starec de ta réponse rapide, en plus je ne connaissais pas "cdb1"

[Invité]

Re

Ce n'est pas cdb1, mais cdbl, pour les trois chiffres va voir du coté de la fonction Format

Starec

[lulux80]

comment ça
Format +
No comprendo

[BM42]

Re Lulux80

moi non plus je ne connaissais pas le cdb1
Tu peut utiliser la propriété Format de ton textbox pour définir le format de tes nombres

A+
(PS : Jamais tu te repose ?)