SOMME

Module Module1

    Function somme(ByVal a As Integer, ByVal b As Integer, Optional ByVal c As Integer = 0) As Integer

        Return a + b + c

    End Function

    Sub Main()

        Console.WriteLine("somme est" & somme(1, 5, 1))

        Console.Read()

    End Sub

End Module

SOURCE