Discussion :

[mickael62800]

Bonjour,

j'ai fait un code avec un calcul a l'interieur qui marche mais un truc m'échappe

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
Public Class Form1
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim resultat As Integer = calcul()
        afficher(resultat)
 
 
    End Sub
    Private Function calcul() As Integer
        Dim x As Integer = TextBox1.Text
        Dim y As Integer = TextBox2.Text
        Return x * y
    End Function
    Private Sub afficher(resultat As Integer)
        MessageBox.Show(resultat)
    End Sub
 
 
 
End Class

Au niveau de la fonction calcul(), a quoi sert le paramètre qui se trouve entre les () et a quel moment faut t'il en mettre une ??

Je suis un gros débutant en langage de programmation.

Merci d'avance pour vos explication

[Lytchit]

Bonsoir.

Au niveau de la fonction calcul(), a quoi sert le paramètre qui se trouve entre les () et a quel moment faut t'il en mettre une ??

En gros : il est possible de passer des paramètres à une fonction, c'est-à-dire lui fournir une valeur ou le nom d'une variable afin que la fonction puisse effectuer des opérations sur ces paramètres ou bien grâce à ces paramètres.
Lorsque tu passes plusieurs paramètres à une fonction il faut les séparer par des virgules, aussi bien dans la déclaration que dans l'appel et il faudra veiller à bien passer le bon nombre de paramètres lors de l'appel au risque sinon de créer une erreur dans votre script.

Lytchit

[mickael62800]

Merci Lytchit pour ton explication

Si j'ai bien compris, je peux modifier mon code comme ce si :

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
Public Class Form1
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim resultat As Integer = calcul()
        afficher(resultat)
 
 
    End Sub
    Private Function calcul(x, y As Integer) As Integer
        x  = TextBox1.Text
        y  = TextBox2.Text
        Return x * y
    End Function
    Private Sub afficher(resultat As Integer)
        MessageBox.Show(resultat)
    End Sub
 
 
 
End Class

Donc mettre calcul(x, y as integer) as integer et leur donner une valeur a une ligne en dessous?

[Lytchit]

Oui par exemple.
Le tout étant de bien penser à également passer les arguments au moment de la déclaration de la fonction ;-).

Lytchit

[mickael62800]

je reviens vers vous avec mon code modifié

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
Public Class Form1
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        calcul()
        afficher()
 
    End Sub
    Private Sub afficher()
        MessageBox.Show(calcul)
    End Sub
    Private Function calcul(x As Integer, y As Integer) As Integer
        x = TextBox1.Text
        y = TextBox2.Text
 
        Return x * y
    End Function
End Class

Sa marche très bien mais il me dit qu'il y a tout de même des erreurs. Il me souligne en bleu le "calcul()" dans le sub afficher et le sub du boutton1

ma démarche était de mettre le x et y dans la fontion calcul (x As Integer, y As Integer)

voila les erreurs
Erreur 1 Argument non spécifié pour le paramètre 'x' de 'Private Function calcul(x As Integer, y As Integer) As Integer'. C:\Users\Mickael\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 4 9 WindowsApplication1
Erreur 2 Argument non spécifié pour le paramètre 'y' de 'Private Function calcul(x As Integer, y As Integer) As Integer'. C:\Users\Mickael\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 4 9 WindowsApplication1
Erreur 3 Argument non spécifié pour le paramètre 'x' de 'Private Function calcul(x As Integer, y As Integer) As Integer'. C:\Users\Mickael\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 9 25 WindowsApplication1
Erreur 4 Argument non spécifié pour le paramètre 'y' de 'Private Function calcul(x As Integer, y As Integer) As Integer'. C:\Users\Mickael\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 9 25 WindowsApplication1

[rv26t]

Bonjour,

Si on défini des paramètres pour la fonction (x As Integer, y As Integer), il faut mettre les valeurs à traiter lors de l'appel de cette fonction calcul(3, 2).

Code :

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

1
2
3
4
5
6
7
8
9
10
Public Class Form1
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        MessageBox.Show(calcul(Integer.Parse(TextBox1.Text), Integer.Parse(TextBox2.Text)))
    End Sub
    Private Function calcul(x As Integer, y As Integer) As Integer
        Return x * y
    End Function
 
End Class

Attention, ici il n'y a pas de controle sur les nombres.

Le Cours VB.NET de Philippe Lasserre est une mine d'information, très bien pour apprendre.
A mon avis il vaut mieux étudier le cours plutôt que de partir dans tous les sens.