إرجاع عدد صحيح يشير إلى نوع فرعي ل متغير.
بناء الجملة
VarType ( varname )
إن اسم وسيطة المطلوب هو متغير يحتوي على أي متغير باستثناء متغير من نوع معرف من قبل المستخدم.
إرجاع القيم
ثابت |
القيمة |
الوصف |
vbEmpty |
0 |
فارغ (غير مهيأ) |
vbNull |
1 |
Null (بدون بيانات صالحة) |
vbInteger |
2 |
العدد الصحيح |
vbLong |
3 |
عدد صحيح طويل |
vbSingle |
4 |
رقم النقطة العائمة ذات الدقة الواحدة |
vbDouble |
5 |
رقم النقطة العائمة بدقة مزدوجة |
vbCurrency |
6 |
قيمة العملة |
vbDate |
7 |
قيمة التاريخ |
vbString |
8 |
String |
vbObject |
9 |
عنصر |
vbError |
10 |
قيمة خطأ |
vbBoolean |
11 |
قيمة منطقية |
vbVariant |
12 |
متغير (يستخدم فقط مع صفائف المتغيرات) |
vbDataObject |
13 |
كائن الوصول إلى البيانات |
vbDecimal |
14 |
قيمة عشرية |
vbByte |
17 |
قيمة باليت |
vbUserDefinedType |
36 |
المتغيرات التي تحتوي على أنواع معرفة من قبل المستخدم |
vbArray |
8192 |
صفيف |
ملاحظة: يتم تحديد هذه الثوابت بواسطة Visual Basic for Applications. يمكن استخدام الأسماء في أي مكان في التعليمات البرمجية الخاصة بك مكان القيم الفعلية.
ملاحظات
لا ترجع الدالة VarType أبدا قيمة vbArray بمفردها. وتضاف دائما إلى بعض القيم الأخرى للإشارة إلى صفيف من نوع معين. يتم إرجاع vbVariant الثابت فقط بالتزامن مع vbArray للإشارة إلى أن الوسيطة إلى الدالة VarType هي صفيف من النوع Variant. على سبيل المثال، يتم حساب القيمة التي يتم إرجاعها لصفيف من عدد صحيح على أنها vbInteger + vbArray، أو 8194. إذا كان هناك كائن لديه خاصية ، فإن VarType(كائن) يرجع نوع الخاصية الافتراضية للكائن.
مثال
ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة نمطية في Visual Basic for Applications (VBA). لمزيد من المعلومات حول استخدام VBA، حدد "مرجع المطور" في القائمة المنسدل إلى جانب "البحث" وأدخل مصطلحا واحدا أو أكثر في مربع البحث.
يستخدم هذا المثال الدالة VarType لتحديد النوع الفرعي لمتغير.
Dim IntVar, StrVar, DateVar, MyCheck
' Initialize variables.
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69#
MyCheck = VarType(IntVar) ' Returns 2.
MyCheck = VarType(DateVar) ' Returns 7.
MyCheck = VarType(StrVar) ' Returns 8.