[سيف سالم]

المشاركة الأصلية كتبت بواسطة 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.

وشكرا

انا لله وانا اليه راجعون

IsNumeric returns True if the data type of Expression is Boolean, Byte, Decimal, Double, Integer, Long, SByte, Short, Single, UInteger, ULong, or UShort, or an Object that contains one of those numeric types. It also returns True if Expression is a Char or String that can be successfully converted to a number.

IsNumeric returns False if Expression is of data type Date or of data type Object and it does not contain a numeric type. IsNumeric returns False if Expression is a Char or String that cannot be converted to a number.

هذه هي الدالة
بدون تغليف او فلسفة لانتصار لرأي