Discussion :

[pidouni]

bonjour,

j'essaie de faire des calcules avec des textbox

est ce que il faut que je fasse un private sub avec mon textbox(total),
une fuction, public sub.

je sais plus quoi faire

[wallace1]

bonjour,

j'essaie de faire des calcules avec des textbox

est ce que il faut que je fasse un private sub avec mon textbox(total),
une fuction, public sub.

je sais plus quoi faire

Bonjour,

Ce n'est pas le type du contrôle (Textbox) qui définira si tu dois utiliser une méthode avec un résultat en retour ou non !

Je pense que tu devrais creuser du côté des cours sur les notions suivantes :

- Méthodes (Sub, Function)
- Gestionnaires d’événement (ex : TextChanged très souvent employé pour une TextBox)

A+

[rv26t]

Bonjour,

La question est un peu vague, tout dépend de se que tu souhaites faire de tes calculs.
Une première approche pour te donner des idées.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
    Private Sub btnCalcul_Click(sender As System.Object, e As System.EventArgs) Handles btnCalcul.Click
        Dim a As Integer = 0
        Dim b As Integer = 0
        Dim c As Double = 0
        If Integer.TryParse(txtNombre1.Text, a) Then
            If Integer.TryParse(txtNombre2.Text, b) Then
                c = Calcul(a, b)
                MessageBox.Show("Le résultat est : " & c.ToString)
            Else
                MessageBox.Show("Veuillez saisir un nombre (2ème TextBox)")
            End If
        Else
            MessageBox.Show("Veuillez saisir un nombre (1er TextBox)")
        End If
    End Sub
    Function Calcul(a As Integer, b As Integer) As Double
        Dim Resultat As Double = 0
        ' calcul
        '...
        Return Resultat
    End Function

En utilisant une fonction, tu crés ton traitement qui ne fait que les calculs et te renvoie le résultat.
Pour la vérification des saisies, plutôt que de traiter au moment ou l'utilisateur lance le traitement, tu peux le faire sur la perte de focus du TextBox.
Ainsi lorsque l'utilisateur clique sur le bouton tout est prêt et le calcul est effectué.

Le Cours VB.NET de Philippe Lasserre est une mine d'information, très bien pour apprendre.

[Edit] (grillé) Wallace1 est plus rapide.

[pidouni]

merci rv26t

je recherches a faire

un calcule avec 3 textbox (tb1, tb2 et tb3)

tb1 est variable par l'utlisateur

tb2 est fix et importer d'un autre form

tb3 est le resultat de tb1 * tb2

je ne veux pas utiliser de bouton pour faire le calcule

[rv26t]

Wallace1 t'as indiqué quel évènement du textbox utiliser.
Il existe aussi la méthode IsNumeric pour vérifier la saisie avant de procéder aux conversions et calculs.

[pidouni]

bonsoir

j.ai eu des progres en changant la declaration de textbox textchanged par enter

sauf que quand j'essaie le programme mon textbox 1 et 3 affiche 0
la valeur de textbox 2 reste correct

en attendant avec patience je continue de trouver une solution

[rv26t]

Sans voir le code impossible de t'aider.

[pidouni]

Code :

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

1
2
3
4
5
6
7
8
9
Function calccomvs()
        Dim var1 As Integer
        Dim var2, var3 As Double
        FACCOM.qtevs.Text = var1
        prix.tbcomvs.Text = var2
        FACCOM.totvs.Text = var3
        var3 = var1 * var2
        Return var3
    End Function

mon textbox est en textchanged

Code :

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

calccomvs()

[Kropernic]

Plutôt que de jouer au petit chimiste (un peu de ci, un peu de ça et on voit ce que cela donne), il vaudrait mieux commencer par lire le cours de Philippe Lasserre dont le lien a déjà été donné.

[wallace1]

Plutôt que de jouer au petit chimiste (un peu de ci, un peu de ça et on voit ce que cela donne), il vaudrait mieux commencer par lire le cours de Philippe Lasserre dont le lien a déjà été donné.

Tout à fait d'accord avec toi.

Ceci dit même les chimistes sont plus méthodiques.

[rv26t]

Bon, sais-tu ce que fait ton programme ?
Une partie affectation de valeurs à des TextBox (ou des contrôles ayant une propriété Text)

Code :

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

1
2
3
        FACCOM.qtevs.Text = var1
        prix.tbcomvs.Text = var2
        FACCOM.totvs.Text = var3

Comme Var1, Var2 et Var3 valent 0 tu affiches des 0 dans les TextBox

Une partie calcul

Code :

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

1
2
3
4
5
6
7
Function calccomvs()
        Dim var1 As Integer
        Dim var2, var3 As Double
'... partie affichage, voir commentaire au dessus
        var3 = var1 * var2
        Return var3
    End Function

A la déclaration même si cela n'est pas écrit explicitement, Var1 var2 et var3 valent 0
donc var3 = var1 * var2 donne a l'exécution var3 = 0 * 0, inutile de te dire ce que renvoie var3.

Je te redonne le lien du Cours VB.NET de Philippe Lasserre qui est une mine d'information pour débuter, très bien pour apprendre.
Commence avec : III-C-1. Les instructions