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

SAXOBIC 30 Messages postés mercredi 21 janvier 2004Date d'inscription 1 février 2007 Dernière intervention - 13 août 2005 à 11:51 - Dernière réponse : sousoulebarbu 107 Messages postés mercredi 27 juillet 2005Date d'inscription 11 janvier 2009 Dernière intervention
- 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

cs_CanisLupus 3758 Messages postés mardi 23 septembre 2003Date d'inscription 13 mars 2006 Dernière intervention - 13 août 2005 à 11:56
+3
Utile
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 !?
Cette réponse vous a-t-elle aidé ?  
SAXOBIC 30 Messages postés mercredi 21 janvier 2004Date d'inscription 1 février 2007 Dernière intervention - 13 août 2005 à 12:05
0
Utile
Merci beaucoup Canislupus
A+
cs_hassen 338 Messages postés mardi 28 janvier 2003Date d'inscription 4 novembre 2008 Dernière intervention - 14 août 2005 à 21:42
0
Utile
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
cs_CanisLupus 3758 Messages postés mardi 23 septembre 2003Date d'inscription 13 mars 2006 Dernière intervention - 15 août 2005 à 10:29
0
Utile
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 !?
cs_hassen 338 Messages postés mardi 28 janvier 2003Date d'inscription 4 novembre 2008 Dernière intervention - 15 août 2005 à 23:00
0
Utile
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
sousoulebarbu 107 Messages postés mercredi 27 juillet 2005Date d'inscription 11 janvier 2009 Dernière intervention - 13 mars 2006 à 17:55
0
Utile
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?
cs_CanisLupus 3758 Messages postés mardi 23 septembre 2003Date d'inscription 13 mars 2006 Dernière intervention - 13 mars 2006 à 19:07
0
Utile
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
sousoulebarbu 107 Messages postés mercredi 27 juillet 2005Date d'inscription 11 janvier 2009 Dernière intervention - 13 mars 2006 à 19:29
0
Utile
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.