Vrací celé číslo (Typ dat Integer: Základní typ dat zahrnující celá čísla. Proměnná Integer je uložena jako 16bitové (2bajtové) číslo s hodnotou v rozsahu od -32,768 do 32,767.) představující kód znaku (Kód znaku: Číslo představující určitý znak v sadě, například ve znakové sadě ANSI.) odpovídající prvnímu písmenu v řetězci.
Syntaxe
Asc(řetězec)
Požadovaným argumentem (Argument: Hodnota, která poskytuje informace určité akci, události, metodě, vlastnosti, funkci nebo proceduře.) řetězec je libovolný platný ř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</.). Pokud řetězec neobsahuje žádné znaky, objeví se chyba při běhu (Chyba za běhu: Chyba, kterou lze zjistit, pouze pokud je aplikace spuštěna.).
Poznámky
Rozsah vrácených hodnot u jiných systémů než DBCS je 0 – 255, avšak u systémů DBCS (DBCS: Znaková sada, která k reprezentaci znaků používá 1 nebo 2 bajty a umožňuje tak vyjádřit více než 256 znaků.) je to –32768 – 32767.
Poznámka: Funkce AscB se používá pro bajtová data obsažená v řetězci. Namísto vrácení kódu znaku pro první znak vrací funkce AscB první bajt. Funkce AscW vrací kód znaku ve formátu Unicode (Unicode: Standard kódování znaků vyvinutý konzorciem Unicode Consortium. Tím, že toto kódování používá pro každý znak více než jeden bajt, umožňuje, aby byly v jedné znakové sadě zahrnuty téměř všechny psané jazyky světa.), ne však na platformách, kde formát Unicode není podporován. V takovém případě je chování stejné jako u funkce Asc.
Poznámka: Jazyk Visual Basic pro systém Macintosh nepodporuje řetězce ve formátu Unicode. Proto funkce AscW(n) nemůže vrátit žádné znaky ve formátu Unicode pro hodnoty n v rozsahu 128 – 65 535, jako je tomu v prostředí Windows. Namísto toho se funkce AscW(n) pokusí o nejlepší odhad hodnot n ve formátu Unicode vyšších než 127. Proto byste funkci AscW neměli v prostředí Macintosh používat.
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 se pomocí funkce Asc vrací kód znaku odpovídající prvnímu písmenu v řetězci.
Dim MyNumber
MyNumber = Asc("A") ' Returns 65.
MyNumber = Asc("a") ' Returns 97.
MyNumber = Asc("Apple") ' Returns 65.