عرض مشاركة واحدة
  #470  
قديم 14-04-2013, 10:22 PM
tmrmsr tmrmsr غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Aug 2012
المشاركات: 303
معدل تقييم المستوى: 13
tmrmsr is on a distinguished road
Smile

اقتباس:
المشاركة الأصلية كتبت بواسطة tmrmsr مشاهدة المشاركة
تحية طيبة لحضرتك
أما بعد
Dim a As Boolean
((MsgBox(IsNumeric(a

حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية True

عند استخدام الدالة IsNumeric الوسيط a وتستقبله على شكل Object ( عددي - حرفي - ...الخ)
تستخدمه الدالة في أسطر الكود الخاصة بها وهي مخفية عنا وفقا لقاعدة التغليف
وذلك لتقييمة هل هو قيمة رقمية أم لا

وبناء عليه تم اعتبار a كقيمة رقمية

مثال
عند عمل تحويل للقيمة True ل Integer تأخذ القيمة -1
عند عمل تحويل للقيمة false ل Integer تأخذ القيمة 0
وهذا لا يعني أن الدالة IsNumeric تقوم بهذا النوع من التحويل


Parameters:
Expression: Required. Object expression.

Return Values:
Returns a Boolean value indicating whether an expression can be evaluated as a number.

وشكرا
كتب true بالخطأ
تصحيح القيمة الأفتراضية false