Zobrazit vše

Skrýt vše

Vrátí hodnotu typu Boolean označující, zda může být výraz (Výraz: Libovolná kombinace matematických nebo logických operátorů, konstant, funkcí a názvů polí, ovládacích prvků a vlastností, kterou je možné vyhodnotit jako jednu hodnotu. Pomocí výrazů je možné provádět výpočty, pracovat se znaky nebo testovat data.) převeden na datum.

Syntaxe

IsDate(výraz)

Povinným argumentem (Argument: Hodnota, která poskytuje informace určité akci, události, metodě, vlastnosti, funkci nebo proceduře.) výraz je hodnota typu Variant (Datový typ Variant: Výchozí datový typ pro proměnné, které neobsahují znaky deklarace typu, není-li aktivní příkaz Deftyp. V proměnné typu Variant mohou být uložena čísla, řetězce, datum a čas nebo hodnoty Null či Empty.) obsahující výraz pro kalendářní datum nebo řetězcový výraz (Řetězcový výraz: Výraz, který je vyhodnocen jako posloupnost sousedících znaků. Prvky výrazu mohou zahrnovat: funkce vracející řetězec nebo řetězec typu Variant (VarType 8), řetězcový literál, konstantu, proměnnou nebo řetězec typu Variant</.), který lze rozpoznat jako datum nebo čas.

Poznámky

Pokud daný výraz představuje datum nebo jej lze rozpoznat jako platné datum, vrátí funkce IsDate hodnotu True. Jinak vrátí hodnotu False. V systému Microsoft Windows jsou platnými daty data v rozsahu od 1. ledna 100 do 31. prosince 9999 našeho letopočtu. Tento rozsah se u jednotlivých operačních systémů liší.

Příklad

 Poznámka:   Následující příklady uvádějí použití této funkce v modulu jazyka Visual Basic for Applications (VBA). Další informace o práci s jazykem VBA získáte tak, že klepnete na položku Referenční informace pro vývojáře v rozevíracím seznamu vedle pole Hledat a do pole pro hledání zadáte jeden nebo více pojmů.

V tomto příkladu je pomocí funkce IsDate zjištěno, zda lze výraz převést na datum.

Dim MyDate, YourDate, NoDate, MyCheck

MyDate = "February 12, 1969"
YourDate = #2/12/69#
NoDate = "Hello"

MyCheck = IsDate(MyDate)    ' Vrátí hodnotu True.
MyCheck = IsDate(YourDate)    ' Vrátí hodnotu True.
MyCheck = IsDate(NoDate)    ' Vrátí hodnotu False.