Renvoie un entier représentant le code de caractère correspondant à la première lettre d’une chaîne.
Syntaxe
Asc(string)
L’argument de chaînerequis est toute expression de chaîne valide. Si la chaîne ne contient aucun caractère, une erreur d’exécution se produit.
Remarques
La plage de retours est comprise entre 0 et 255 sur les systèmes non DBCS, mais –32768 – 32767 sur les systèmes DBCS.
Remarque
La fonction AscB est utilisée avec les données d’octet contenues dans une chaîne. Au lieu de retourner le code de caractère du premier caractère, AscB retourne le premier octet. La fonction AscW retourne le code de caractère Unicode, sauf sur les plateformes où Unicode n’est pas pris en charge, auquel cas, le comportement est identique à la fonction Asc .
Remarque
Visual Basic pour Macintosh ne prend pas en charge les chaînes Unicode. Par conséquent, AscW(n) ne peut pas retourner tous les caractères Unicode pour n valeurs comprises entre 128 et 65 535, comme dans l’environnement Windows. Au lieu de cela, AscW(n) tente une « meilleure estimation » pour les valeurs Unicode n supérieures à 127. Par conséquent, vous ne devez pas utiliser AscW dans l’environnement Macintosh.
Exemples de requêtes
| Expression | Résultats |
|---|---|
| SELECT Asc(« a ») AS Expr1 FROM ProductSales ; | Retourne le code « ASCII » pour la chaîne « a ». Résultat : « 97 ». |
| SELECT Asc(« Z ») AS AscCode FROM ProductSales ; | Retourne le code « ASCII » de la chaîne « Z » dans la colonne AscCode. Résultat : « 90 ». |
Exemple VBA
Remarque
Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de Rechercher et entrez un ou plusieurs termes dans la zone de recherche.
Cet exemple utilise la fonction Asc pour renvoyer un code de caractère correspondant à la première lettre de la chaîne.
Dim MyNumber
MyNumber = Asc("A") ' Returns 65.
MyNumber = Asc("a") ' Returns 97.
MyNumber = Asc("Apple") ' Returns 65.