operation en visual basic .net Résolu

Question

Bonjour, 

J'ai créer un programme qui additionne ou soustrait ou multiplie ou encore divise deux chiffres, il me met comme resultat zero a chaque fois ! quel est le probleme ?

Voici le code source :

Public Class Form1
    Dim operation As String


    Private Function addition(ByVal chiffre1 As Integer, ByVal chiffre2 As Integer)
        Dim Resultat As Integer
        If operation = "addition" Then
            Resultat = chiffre1 + chiffre2
        ElseIf operation = "soustraction" Then
            Resultat = chiffre1 - chiffre2
        ElseIf operation = "multiplication" Then
            Resultat = chiffre1 * chiffre2
        ElseIf operation = "division" Then
            Resultat = chiffre1 / chiffre2
        End If
        Return Resultat
    End Function

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Label1.Text = "le resultat est : " & addition(TextBox1.Text, TextBox2.Text)
        MsgBox(ComboBox1.SelectedItem)
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If ComboBox1.SelectedItem = "+" Then
            operation = "addition"
        ElseIf ComboBox1.SelectedItem = "-" Then
            operation = "soustraction"
        ElseIf ComboBox1.SelectedItem = "x" Then
            operation = "multiplication"
        ElseIf ComboBox1.SelectedItem = "/" Then
            operation = "division"
        End If
    End Sub
End Class

Configuration: Windows XP / Google Chrome

Polux31 · Answer

Bonjour,

A quel moment est affecté la valeur de la variable "opération" ? 

A 1ère vue, c'est le choix  de Combobox1 qui détermine de l'opérateur. C'est donc sur l'évènement click du bouton 1 qu'il faut initialiser "operation" en faisant un contrôle sur le contenu de la sélection du combobox1 pour s'assurer qu'il y a bien un élément sélectionné.

;o)

Varaldi Q · Answer

Le VB commence à être bien loin pour moi, cependant, de mémoire, il me semble que tu as oubliés quelques end if là dedans

If operation = "addition" Then
            Resultat = chiffre1 + chiffre2
        ElseIf operation = "soustraction" Then
            Resultat = chiffre1 - chiffre2
        ElseIf operation = "multiplication" Then
            Resultat = chiffre1 * chiffre2
        ElseIf operation = "division" Then
            Resultat = chiffre1 / chiffre2
        End If

genre

If operation = "addition" Then
        Resultat = chiffre1 + chiffre2
        ElseIf operation = "soustraction" Then
            Resultat = chiffre1 - chiffre2
        End If
        ElseIf operation = "multiplication" Then
                Resultat = chiffre1 * chiffre2
        End If
        ElseIf operation = "division" Then
            Resultat = chiffre1 / chiffre2
        End If
End If

Operation en visual basic .net

2 réponses

Votre réponse

Discussions similaires

Newsletters