Tutoriel - Crée ces propres fonctions

[Westiix]

Bonsoirs,

Dans ce tutoriel nous allons apprendre à crée ces propres fonctions à l'aide d'un module .

Requis :
- Une form
- Un module

Comment crée un module ?
Il faut tout simplement suivre ce screen :

1) Clique droit sur le nom de vôtre projet
2) Cliquer sur "Ajouter"
3) Cliquer sur "Module..."

Une fois le module crée, double cliquez dessus afin d'atteindre la partie qui nous permettra de crée nos fonctions .

Sur cette interface nous allons commencé à codé nos premières "fonctions personnels" .

Ci-dessous , un petit exemple pour faire une fonction qui fera une addition :

Code :

    ' String = Texte
    ' Integer = Nombre/Chiffre
    ' CheckBox = Pour les CheckBox (pour coché etc..)
    ' TextBox = Pour les TextBox (pour ecrire dedans etc..)
 
    ' Function = Retourne une valeur etc..
    ' Sub = Ne retourne aucune valeur
    Function Addition(ByVal Valeur1 As Integer, ByVal Valeur2 As Integer) As Integer ' On vient de crée une fonction qui devra comporté entre parenthèse "Valeur1" séparé par une virgule de "Valeur2")
        Return Valeur1 + Valeur2 ' Quand on fera appelle à nôtre fonction " Addition("10", "20") sa additionnera les 2 (donc 10 + 20)  // Autre exemple : Addition(TextBox1.Text, TextBox2.Text)
    End Function

Un autre exemple pour crée une fonction qui cochera une certaine CheckBox (et la même pour décoché cette même CheckBox) :

Code :

    Sub Check(ByVal NOMcheckbox As CheckBox) ' On vient de crée une fonction qui devra comporté entre parenthèse "NOMcheckbox" (le nom de la CheckBox à coché) // Exemple : Check(CheckBox1) (se qui fera que la CheckBox1 sera coché)
        NOMcheckbox.Checked = True
    End Sub
 
    Sub UnCheck(ByVal NOMcheckbox As CheckBox) ' On vient de crée une fonction qui devra comporté entre parenthèse "NOMcheckbox" (le nom de la CheckBox à décoché) // Exemple : UnCheck(CheckBox1) (se qui fera que la CheckBox1 sera décoché)
        NOMcheckbox.Checked = False
    End Sub

Exemple d'utilisation de nos fonctions (dans ce cas là, quand on cliquera sur un bouton si la CheckBox1 est décoché ALORS sa la cochera SINON sa la décochera) :

Code :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If CheckBox1.Checked = False Then
            Check(CheckBox1)
        Else
            UnCheck(CheckBox1)
        End If
    End Sub

J'espère que ce tutoriel vous aura apprit quelques chose et que sa vous a plût

 

[FFM | iMoDzRGFR]

Merci du tuto ;-)

 

[Moncler]

Je disilke !

 

[Kerir]

Merci du tuto

 

[Westiix]

Bientôt peut-être un petit partage d'un module que j'ai crée (donc pleins de fonction re-crée par moi même).