Vrátí celé číslo představující Kód znaku odpovídající prvnímu písmenu v řetězci.
Syntaxe
Asc ( řetězec )
Požadovaný Argument řetězce je libovolný platný Řetězcový výraz. Pokud řetězec neobsahuje žádné znaky, dojde k Chyba za běhu.
Poznámky
Rozsah návratů je 0 –255 v systémech jiných než DBCS, ale –32768 – 32767 v systémech DBCS.
Poznámka: Funkce AscB se používá s bajtovými daty obsaženými v řetězci. Místo vrácení kódu prvního znaku vrátí AscB první bajt. Funkce AscW vrátí kód Unicode znaku s výjimkou platforem, kde není podporováno kódování Unicode. V tomto případě je chování stejné jako funkce Asc .
Poznámka: Jazyk Visual Basic pro Macintosh nepodporuje řetězce unicode. AscW(n) proto nemůže vrátit všechny znaky Unicode pro n hodnot v rozsahu 128 až 65 535, stejně jako v prostředí Windows. Místo toho se AscW(n) pokusí o "nejlepší odhad" pro hodnoty Unicode n větší než 127. Proto byste neměli používat AscW v prostředí Macintosh.
Příklady dotazů
|
Výraz |
Výsledky |
|
SELECT Asc("a") AS Expr1 FROM ProductSales; |
Vrátí kód "ASCII" pro řetězec "a". Výsledek: "97". |
|
SELECT Asc("Z") AS AscCode FROM ProductSales; |
Vrátí kód "ASCII" pro řetězec "Z" ve sloupci AscCode. Výsledek: "90". |
Příklad jazyka VBA
Poznámka: Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.
V tomto příkladu se funkce Asc používá k vrácení kódu znaku odpovídajícího prvnímu písmenu v řetězci.
Dim MyNumberMyNumber = Asc("A") ' Returns 65.MyNumber = Asc("a") ' Returns 97.MyNumber = Asc("Apple") ' Returns 65.
