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.)
vyhodnocen jako číslo.
Syntaxe
IsNumeric(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 (Typ dat Variant: Výchozí typ dat 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í číselný výraz (Číselný výraz: Libovolný výraz, jehož výsledkem je číslo. Výraz může být libovolnou kombinací proměnných, konstant, funkcí a operátorů.)
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</.).
Poznámky
Funkce IsNumeric vrátí hodnotu True v případě, že je celý výraz rozpoznán jako číslo. Jinak vrátí hodnotu False.
Pokud je argumentem výraz výraz pro kalendářní datum (Datum: Každý výraz, který může být považován za datum, včetně datových literálů, čísel a řetězců, které vypadají jako datum, a dat vrácených z funkcí.), vrátí funkce IsNumeric hodnotu False.
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 IsNumeric zjištěno, zda lze proměnnou vyhodnotit jako číslo.
Dim MyVar, MyCheck
MyVar = "53" ' Assign value.
MyCheck = IsNumeric(MyVar) ' Returns True.
MyVar = "459.95" ' Assign value.
MyCheck = IsNumeric(MyVar) ' Returns True.
MyVar = "45 Help" ' Assign value.
MyCheck = IsNumeric(MyVar) ' Returns False.