إرجاع عدد صحيح يمثل رمز الحرف المطابق للحرف الأول من سلسلة.
بناء الجملة
Asc(سلسلة)
إن وسيطة السلسلةالمطلوبة هي أي تعبير سلسلة صحيح. إذا لم تحتوي السلسلة على أي أحرف، يحدث خطأ في وقت التشغيل.
ملاحظات
يتراوح نطاق العوائد من 0 إلى 255 على الأنظمة غير DBCS، ولكن 32768- على أنظمة DBCS.
ملاحظة
يتم استخدام الدالة AscB مع بيانات البايت الموجودة في سلسلة. بدلا من إرجاع رمز الحرف للحرف الأول، ترجع الدالة AscB البايت الأول. ترجع الدالة AscW التعليمات البرمجية لحرف Unicode باستثناء الأنظمة الأساسية التي لا يدعم Unicode، وفي هذه الحالة، يكون السلوك مماثلا لوظيفة Asc .
ملاحظة
لا يدعم Visual Basic ل Macintosh سلاسل Unicode. لذلك، لا يمكن ل AscW(n) إرجاع جميع أحرف Unicode لقيم n في النطاق من 128 إلى 65535، كما هو الحال في بيئة Windows. بدلا من ذلك، يحاول AscW(n) إجراء "أفضل تخمين" لقيم Unicode n أكبر من 127. لذلك، يجب عدم استخدام AscW في بيئة Macintosh.
أمثلة عن الاستعلام
| التعبير | النتائج |
|---|---|
| تحديد Asc("a") AS Expr1 من ProductSales؛ | ترجع التعليمة البرمجية "ASCII" للسلسلة "a". النتيجة: "97". |
| تحديد Asc("Z") ك AscCode من ProductSales؛ | إرجاع التعليمة البرمجية "ASCII" للسلسلة "Z" في العمود AscCode. النتيجة: "90". |
مثال VBA
ملاحظة
توضح الأمثلة التالية استخدام هذه الدالة في وحدة نمطية ل Visual Basic for Applications (VBA). لمزيد من المعلومات حول استخدام VBA، حدد "مرجع المطور" في القائمة المنسدلة بجوار "بحث" وأدخل مصطلح أو أكثر في مربع البحث.
يستخدم هذا المثال الدالة Asc لإرجاع رمز حرف مطابق للحرف الأول من السلسلة.
Dim MyNumber
MyNumber = Asc("A") ' Returns 65.
MyNumber = Asc("a") ' Returns 97.
MyNumber = Asc("Apple") ' Returns 65.