الدالة VarType

ينطبق على
Access لـ Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

ترجع ذلك Integer يشير إلى النوع الفرعي لمتغير.

بناء الجملة

VarType(varname)

الوسيطة المطلوبة varname تحتوي Variant على أي متغير باستثناء النوع المعرف من قبل المستخدم.

إرجاع القيم

القيمة الثابتة Value الوصف
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 Variant (يستخدم فقط مع صفائف المتغيرات)
vbDataObject 13 عنصر الوصول إلى البيانات
vbDecimal 14 قيمة عشرية
vbByte 17 قيمة البايت
vbUserDefinedType 36 المتغيرات التي تحتوي على أنواع معرفة من قبل المستخدم
vbArray 8192 صفيف

ملاحظة

يتم تعريف هذه الثوابت بواسطة Visual Basic for Applications (VBA). يمكنك استخدام الأسماء في أي مكان في تعليماتك البرمجية بدلا من القيم الفعلية.

ملاحظات

لا ترجع الدالة VarType القيمة مطلقا vbArray من تلقاء نفسها. دائما ما تضيف هذه القيمة إلى قيمة أخرى للإشارة إلى صفيف من نوع معين.

يتم إرجاع الثابت vbVariant مع vbArray فقط للإشارة إلى أن الوسيطة TO VarType عبارة عن صفيف من Variant القيم. على سبيل المثال، القيمة التي يتم إرجاعها لصفيف من الأعداد الصحيحة هي vbInteger + vbArray، أو 8194.

إذا كان للكائن خاصية افتراضية، VarType(object) يتم إرجاع نوع الخاصية الافتراضية للعنصر.

مثال

ملاحظة

توضح الأمثلة التالية استخدام هذه الدالة في وحدة نمطية ل 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.