Comment tester la présence ou non d'un argument optionnel [Résolu]

Messages postés
30
Date d'inscription
mercredi 21 janvier 2004
Statut
Membre
Dernière intervention
1 février 2007
- - Dernière réponse : sousoulebarbu
Messages postés
107
Date d'inscription
mercredi 27 juillet 2005
Statut
Membre
Dernière intervention
11 janvier 2009
- 13 mars 2006 à 19:29
Bonjour à tous

Quelqu'un pourait-il m'aider sur :

Comment tester la présence ou non d'un argument optionnel

Merci d'avance à celui qui répondra

Cordialement,

Saxobic
Afficher la suite 

8 réponses

Meilleure réponse
Messages postés
3758
Date d'inscription
mardi 23 septembre 2003
Statut
Modérateur
Dernière intervention
13 mars 2006
8
3
Merci
Salut,

ex :
function test(optional arg1 as string "", optional arg2 as integer 0)
if arg1 ="" then 'pas d'arg1
if arg2 = 0 then 'pas d'arg2
end function

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 108 internautes nous ont dit merci ce mois-ci

Messages postés
30
Date d'inscription
mercredi 21 janvier 2004
Statut
Membre
Dernière intervention
1 février 2007
0
Merci
Merci beaucoup Canislupus
A+
Messages postés
338
Date d'inscription
mardi 28 janvier 2003
Statut
Membre
Dernière intervention
4 novembre 2008
0
Merci
Public Function Somme(a As Integer, b As Integer, Optional c As Integer) As Integer
Somme = a + b
If Not IsMissing(c) Then
Somme = Somme + c
End If
End Function

Hassen TUNISIE
Messages postés
3758
Date d'inscription
mardi 23 septembre 2003
Statut
Modérateur
Dernière intervention
13 mars 2006
8
0
Merci
Non, hassen, extrait de la MSDN :

Note La fonction IsMissing ne fonctionne pas sur les types de données simples (tels que les types Integer ou Double) car, contrairement au type Variant, ces types ne fournissent pas d'indicateur de bit "manquant".

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
Messages postés
338
Date d'inscription
mardi 28 janvier 2003
Statut
Membre
Dernière intervention
4 novembre 2008
0
Merci
Oui CanisLupus en fait j'ai pas beaucoup utilisé la fonction IsMissing je m'ensouvient pas si j'ai utilisé des argument du type simple. Mais ce que je sais c que la fonction IsMissing existe. En fait j'utilise souvent la methode que t'a proposé a savoir la definition de valeur par defaut avec les arguments.
Merci pour l'information

Hassen TUNISIE
Messages postés
107
Date d'inscription
mercredi 27 juillet 2005
Statut
Membre
Dernière intervention
11 janvier 2009
0
Merci
Et comment doit on s'y prendre lorsque l'argument est de type form, j'ai testé ça: Optional formvid As Form = Form1
mais lors de la compilation, j'ai comme erreur: contante requise avec form1 de surligné, Comment je dois faire?
Messages postés
3758
Date d'inscription
mardi 23 septembre 2003
Statut
Modérateur
Dernière intervention
13 mars 2006
8
0
Merci
Pour un objet, c'est différent d'une variable simple de type integer, string, double, .... on ne peut pas lui octroyer une valeur par défaut de la même manière.

La méthode a employer dans ce cas est :

Function test(Optional formvid As Form)

If formvid Is Nothing Then
Set formvid = Form1 ' si form1 existe bien sùr
End If

'ton code, par exemple :
formvid.Show

End Function
Messages postés
107
Date d'inscription
mercredi 27 juillet 2005
Statut
Membre
Dernière intervention
11 janvier 2009
0
Merci
Nikel, ça marche, merci à toi CanisLupus

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.