الدالة VarType

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

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

بناء الجملة

VarType(varname)

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

إرجاع القيم

ثابت 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 للإشارة إلى أن الوسيطة إلى 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.