Additionner soustraire TextBox en direct

1

Bonjour le Forum,

Mon problème :

J'ai un bug que j'arrive pas à trouver la solution.

Private Sub TextBox6_Change()
If TextBox6.Value = "" Then
Me.TextBox19 = lblTXT19
Else
t19 = lblTXT19
TextBox19.Value = t19 - lblTXT6 + Val(TextBox6) (en jaune cette ligne)
End If
End Sub

Le but de ce code est d'additionné et soustraire en direct.

Clic sur le premier nom de la ListView et si on clic dans la TextBox6 pour y mettre exemple 75 cela devrais nous donner 165 dans la TextBox19.

EXPLICATION :

A chaque fois que l’on veut ajouter un nouveau chiffre il vaut supprimer le précédent.
180-90+75=165
et je peux modifier plusieurs fois les données d’une personne.
165-75+245=335

J’ai d’autres calcul de TextBox (exactement les mêmes), mais pour alléger mon fichier je ne les ai pas mis.
TextBox7 à la TextBox20, TextBox8 à la TextBox21, TextBox9 à la TextBox22, TextBox10 à la TextBox23, TextBox11 à la TextBox24, TextBox12 à la TextBox25, TextBox13 à la TextBox26.
Merci d’avance

https://www.cjoint.com/c/KCkiRgQsrIF
    Marco Posté le 10 mars 2021, 09:43
    par Marco
    Répondre
    0

    Bonjour,


    Comme son nom l'indique, un textbox contient du texte. Un label contient un Titre (Caption) donc aussi du texte.

    Ce ne sont pas des nombres ..

    Donc avant d'effectuer des opération arithmétiques sur leur contenu il faut convertir ce contenu en nombre.


    Patrice33740 Posté le 10 mars 2021, 15:43
    par Patrice33740
    0

    Bonjour,

    Ok d'accord, dites moi comment on procède.

    Merci


    Marco Posté le 10 mars 2021, 16:47
    par Marco
    1

    Tu peux utiliser les fonctions de conversions CLong , CDbl ou plus simple VAL comme tu l'as fait pour un des textbox.

    Patrice33740 Posté le 11 mars 2021, 08:42
    par Patrice33740
    0

    Bonjour,

    Ok super merci pour ton aide.

    Bonne journée à toi et au forum.


    Marco Posté le 11 mars 2021, 11:17
    par Marco

    Si vous n'êtes pas inscrit sur le site, vous pouvez poster librement (en tant qu'invité).
    Pour cela, indiquez un pseudonyme (nom d'utilisateur) et une adresse email :