IBM Lotus Symphony


Fonction DateSerial [Exécution]

Renvoie une valeur de Date pour une année, un mois ou un jour précis.

Syntaxe :

DateSerial (year, month, day)

Valeur de retour :

Date

Paramètres :

Year : expression de type nombre entier indiquant une année. Toutes les valeurs situées entre 0 et 99 sont interprétées comme les années comprises entre 1900 et 1999. Pour les années hors de cette plage, vous devez saisir les quatre chiffres.

Month : expression de type nombre entier indiquant le mois de l'année spécifiée. La plage de valeurs correcte est comprise entre 1 et 12.

Day : expression de type nombre entier indiquant le jour du mois spécifié. La plage de valeurs correcte est comprise entre 1 et 31. Aucune erreur n'est renvoyée lorsque vous saisissez un jour qui n'existe pas pour un mois inférieur à 31 jours.

La fonction DateSerial renvoie le nombre de jours entre le 30 décembre 1899 et la date saisie. Vous pouvez utiliser cette fonction pour calculer la différence entre deux dates.

La fonction DateSerial renvoie le type de données variante avec le type VarType 7 (Date). En interne, cette valeur est stockée en tant que valeur au format Double. Ainsi, la valeur renvoyée pour la date 1/1/1900 est 2. Les valeurs négatives correspondent à des dates précédant le 30 décembre 1899 (cette date non comprise).

Si une date est définie hors de la plage admise, Lotus Symphony Basic renvoie un message d'erreur.

Par contre, si vous définissez la fonction DateValue comme une chaîne contenant la date, la fonction DateSerial évalue chacun des paramètres (année, mois, jour) en tant qu'expressions numériques individuelles.

Codes d'erreur

5 Appel de procédure incorrect

Exemple :

Sub ExampleDateSerial

Dim lDate as Long

Dim sDate as String

lDate = DateSerial(1964, 4, 9)

sDate = DateSerial(1964, 4, 9)

msgbox lDate REM Renvoie 23476

msgbox sDate REM Renvoie 04/09/1964

end sub


Commentaires en retour sur le produit | Documentation complémentaire | Marques