IBM Lotus Symphony


Funkcia DateSerial [Runtime]

Vracia hodnotu dátumu pre zadaný rok, mesiac alebo deň.

Syntax:

DateSerial (year, month, day)

Návratová hodnota:

Dátum

Parametre:

Year: Celočíselný výraz označujúci rok. Všetky hodnoty medzi 0 a 99 sú prekladané ako roky 1900-1999. Pre roky, ktoré nespadajú do tohto rozsahu, musíte zadať všetky štyri číslice.

Month: Celočíselný výraz označujúci mesiac špecifikovaného roka. Akceptovaný rozsah je 1-12.

Day: Celočíselný výraz označujúci deň špecifikovaného mesiaca. Akceptovaný rozsah je 1-31. Keď pre mesiac, ktorý je kratší ako 31 dní, zadáte neexistujúci deň, nevráti sa žiadna chyba.

Funkcia DateSerial vráti počet dní medzi 30. decembrom 1899 a daným dátumom. Túto funkciu môžete použiť na výpočet rozdielu medzi dvoma dátumami.

Funkcia DateSerial vráti typ údajov Variant s VarType 7 (Dátum). Interne sa táto hodnota ukladá ako hodnota typu Double, takže ak je daným dátumom 1.1.1900, návratová hodnota bude 2. Záporné hodnoty zodpovedajú dátumom pred 30. decembrom 1899 (nie vrátane).

Ak je zadefinovaný dátum, ktorý leží mimo akceptovaného rozsahu, Lotus® Symphony™ Basic vráti chybovú správu.

Zatiaľ čo funkciu DateValue definujete ako reťazec obsahujúci dátum, funkcia DateSerial vyhodnotí každý z parametrov (rok, mesiac, deň) ako samostatné numerické výrazy.

Chybové kódy

5 Neplatné volanie procedúry

Príklad:

Sub ExampleDateSerial

Dim lDate as Long

Dim sDate ako typ String

lDate = DateSerial(1964, 4, 9)

sDate = DateSerial(1964, 4, 9)

msgbox lDate REM vráti 23476

msgbox sDate REM vráti 04/09/1964

end sub


Spätná väzba na produkt | Ďalšia dokumentácia | Ochranné známky