Renvoie un nombre supérieur représentant la code de caractère correspondant à la première lettre d’une chaîne.
Syntaxe
Asc (chaîne)
La chaîne requiseargument 'est toute chaîne expression de chaîne. Si la chaîne ne contient aucun caractère, une erreur d’exécution se produit.
Remarques
La plage des retours est de 0 à 255 sur des systèmes non-DBCS, mais –32768 – 32767 sur des systèmes DBCS.
Remarque : La fonction AscB est utilisée avec les données d’byte contenues dans une chaîne. Au lieu de renvoyer le code de caractère du premier caractère, AscB renvoie le premier byte. La fonction AscW renvoie le code de caractère Unicode sauf sur les plateformes sur lesquelles Unicode n’est pas pris en charge. Dans ce 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 renvoyer tous les caractères Unicode pour les valeurs n de la plage de 128 à 65 535, comme c’est le cas dans l’environnement Windows. À la place, 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ête
|
Expression |
Résultats |
|
SELECT Asc(« a ») AS Expr1 FROM ProductSales; |
Renvoie le code « ASCII » de la chaîne « a ». Résultat : « 97 ». |
|
SELECT Asc("Z") AS AscCode FROM ProductSales; |
Renvoie le code « ASCII » de la chaîne « Z » dans la colonne AscCode. Résultat : « 90 ». |
Exemple de VBA
Remarque : Les exemples qui suivent illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’travail avec VBA, sélectionnez Référence du développeur dans la liste verte en regard de Rechercher, puis 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.
