Restituisce il codice carattere ANSI corrispondente alla prima lettera di una stringa.
Sintassi
ASC(string)
Note
L'argomento (string) è qualsiasi espressione stringa valida. Se la stringa non contiene caratteri, si verifica un errore di runtime.
Nell'esempio seguente, ASC restituisce il codice carattere ANSI della prima lettera di ciascuna stringa. Nell'esempio seguente viene illustrato l'uso della funzione ASC.
Esempio 1: lettera maiuscola singola
Dim MyNumber
MyNumber = Asc("A") ' Returns 65
'MyNumber has value 65 ANSI Character Code of "A"
Esempio 2: lettera minuscola singola
Dim MyNumber
MyNumber = Asc("a") ' Returns 97
'MyNumber has value 97 ANSI Character Code of "a"
Esempio 3: parola che inizia con una lettera maiuscola
Dim MyNumber
MyNumber = Asc("Apple") ' Returns 65
'MyNumber has value 65 ANSI Character Code of "A"
Esempio 4: parola che inizia con una lettera minuscola
Dim MyNumber
MyNumber = Asc("banana") ' Returns 98
'MyNumber has value 98 ANSI Character Code of "b"
Esempio 5: carattere speciale
Dim MyNumber
MyNumber = Asc("!") ' Returns 33
'MyNumber has value 33 ANSI Character Code of "!"
Esempio 6: numero in una stringa
MyNumber = Asc("12345") ' Returns 49 (ANSI code for '1')
'MyNumber has value 49 ANSI Character Code of "1"
Esempio 7: carattere di spazio
Dim MyNumber
MyNumber = Asc(" ") ' Returns 32
'MyNumber has value 32 ANSI Character Code of " "