paramétre optionel dans une fonction ?

Avec le recherche
http://www.google.fr/search?hl=fr&ie=UTF-8&q=vbscript+%2Bfunction+%2Boptional&btnG=Rechercher&meta=cr%3DcountryFR
tu arrives sur le lien
http://www.tutorials-online.com/articles/espace_vba.aspx#optionnel

Bernard

Bonjour.

Dim Var()

Redim Var(1)
Var(0) = 2
Msgbox MaFonctionSomme(Var)

ReDim Preserve Var(3)
Var(2) = 4
Var(3) = 6
Msgbox MaFonctionSomme(Var)

Function MaFonctionSomme(Arg)
Dim I, J
J = UBound(Arg)
Select Case J
Case 0
Case 1
J = 2
Redim Preserve Arg(J)
Arg(J) = 5
End Select
For I = 0 To J
MaFonctionSomme = MaFonctionSomme + Arg(I)
Next
End Function

Alain CROS


"Julien C." <jc63@free.fr> a écrit dans le message de news: 40f7d060$0$29383$626a14ce@news.free.fr...

Bonjour,

peut on avoir des paramètres optionels (ou par défaut) pour une fonction
en vbscript. et si oui comment.

Merci d'avance Julien .