Vrátí celé číslo představující kód znaku odpovídající prvnímu písmenu v řetězci.
Syntaxe
Asc(řetězec)
Povinným řetězcovýmargumentem je libovolný platný řetězcový výraz. Pokud řetězec neobsahuje žádné znaky, dojde k chybě za běhu.
Poznámky
Rozsah pro vrácení 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 znaku Unicode s výjimkou platforem, kde není kódování Unicode podporováno. 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 MyNumber
MyNumber = Asc("A") ' Returns 65.
MyNumber = Asc("a") ' Returns 97.
MyNumber = Asc("Apple") ' Returns 65.