<< Click to Display Table of Contents >> Asc (Funktion)

Asc(Str)

Ermittelt den Zeichencode des ersten Zeichens einer Zeichenkette gemäß Unicode-Zeichentabelle (UCS-2).

Das Ergebnis ist eine ganze Zahl zwischen 0 und 32767.

Siehe auch: Chr

Beispiel:

Sub Main

 Dim i, Msg

 For i = Asc("A") To Asc("Z")

         Msg = Msg & Chr(i)

 Next i

 MsgBox Msg

End Sub