Discussion :

[zitoune31]

bonjour ou bonsoir,

j'essaye de réaliser un relever de compte bancaire sommaire
je sélectionne a laide d'un combobox l'intituler de mon opération puis dans un textbox le montant de celle-ci et j'aimerai savoir la méthode à utiliser afin que dans mon textboxRESULTAT s'affiche l'addition de mes textbox.text.

mon exemple :

Code :

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

1
2
 
TextBoxTOTAL.Text = (TextBoxMOISPRECEDENT.Text + TextBoxPAIEMENT1.Text + TextBoxPAIEMENT2.Text + TextBoxPAIEMENT3.Text)

cette méthode fonction mais le résultat n'est pas l'addition de mes textbox
explication dans cette méthode :
si dans mon textboxMOISPRECEDENT.text j'entre la somme : 100
puis dans mon TextBoxPAIEMENT1.Text la somme : 800
le résultat de mon textboxRESULTAT.text est : 100800
j'aimerai qu'il affiche l'addition de mes deux sommes donc à savoir : 900
j'espère avoir réussis a bien expliquer mon problème ainsi que ma demande ?!
merci de votre aide
cdlt
olivier

[Vince]

Là tu concatène le contenu de tes textboxes.

Si tu veux faire la somme tu dois faire :

Code :

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

TextBoxTOTAL.Text = CStr(CInt(TextBoxMOISPRECEDENT.Text) + CInt(TextBoxPAIEMENT1.Text) + CInt(TextBoxPAIEMENT2.Text) + Cint(TextBoxPAIEMENT3.Text))

En fait tu converti le texte de chaque TextBox en Entier pour les additionner puis tu converti le tout en chaine (CStr) pour l'assigner dans TextBoxTOTAL qui attend du texte.

Attention cela ne fonctionne que si les valeurs saisies dans les textboxes sont des entiers (CInt), sinon CDbl pour des décimaux. Pense aussi à verrouiller la saisie afin que l'utilisateur ne saisissent par exemple pas des lettres dans les textboxes...

[zitoune31]

je te remercie de ta réponse si rapide je vais étudier ta réponse et oui merci de l'information pour éviter que l'on puisse entrer des lettres ainsi que pour les décimaux

[zitoune31]

j'ai tenter d'effectuer ton code mais j'ai une erreur :

l'exceptionInvalidCastException n'a pas été gérer:
la conversion de la chaîne "" en type integer n'est pas valide

faut-il importer autre chose que :
Imports System.Math
?

[Vince]

C'est parce qu'une de tes Textboxes est vide... Mets 0 comme valeur par défaut dans tes Textboxes.
A toi de bien gérer les saisies utilisateur !

Pour ce calcul tu n'a pas besoin d'import spécifique.

[zitoune31]

Bonjour,

je te remercie de ton éclaircissement et j'espère que l'on pardonnera mon incompétence ....

je n'ai pas encore trouver le moyen d'empêcher la saisi de lettre dans mes textbox mais je vais mis pencher par la suite.

à l'heure actuel mon code es le suivant

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBoxTOTAL.Text = CStr(CInt(TextBoxCCPMOISPRECEDENT.Text) + (TextBoxEspeceMOISPRECEDENT.Text) + (TextBoxPAIEMENT1.Text) + (TextBoxPAIEMENT2.Text) + (TextBoxPAIEMENT3.Text))
        LabelResteEspece.Text = CStr(CInt(TextBoxEspeceMOISPRECEDENT.Text))
        LabelResteCCP.Text = CStr(CInt(TextBoxCCPMOISPRECEDENT.Text) + (TextBoxPAIEMENT1.Text) + (TextBoxPAIEMENT2.Text) + (TextBoxPAIEMENT3.Text))
        TextBoxTOTAL.Text = CStr(CDbl(TextBoxCCPMOISPRECEDENT.Text) + (TextBoxEspeceMOISPRECEDENT.Text) + (TextBoxPAIEMENT1.Text) + (TextBoxPAIEMENT2.Text) + (TextBoxPAIEMENT3.Text))
        LabelResteEspece.Text = CStr(CDbl(TextBoxEspeceMOISPRECEDENT.Text))
        LabelResteCCP.Text = CStr(CDbl(TextBoxCCPMOISPRECEDENT.Text) + (TextBoxPAIEMENT1.Text) + (TextBoxPAIEMENT2.Text) + (TextBoxPAIEMENT3.Text))
    End Sub

je ne comprenais pas pourquoi il ne fonctionnais pas depuis hier soir mais je viens de comprendre que le point "." n'est pas accepter il faut une virgule ","
deux questions me vienne a vous demander
vous remerciant par avance de votre lumière

1/ comment faire en sorte que le point "." et la virgule "," soit accepter dans mon opération ex:
120.20 + 80 = 200.20 ou 120,20 + 80 = 100
2/ question mon code ci-dessus est-il correct ?