إنتقال للمحتوى

  • تسجيل الدخول عبر الفيس بوك تسجيل الدخول عبر تويتر Log In with LinkedIn Log In with Google      تسجيل دخول    
  • إنشاء حساب

صورة
- - - - -

الرجاء المساعدة يااخوان... the CInt function


4 رد (ردود) على هذا الموضوع

#1 انريكي

انريكي

    عضو نشط

  • الأعضــاء
  • 335 مشاركة
  • البـلـد: Country Flag
  • الاهتمامات:Programming

تاريخ المشاركة 14 May 2011 - 04:59 AM

بسم الله الرحمن الرحيم .. السلام عليكم ورحمة الله وبركاته

أخواني ارجوا منكم المساعده


Dim a As Integer = 8

        Dim b As Single = 2.5

        a = CInt(<img src='http://www.araboug.org/ib/public/style_emoticons/<#EMO_DIR#>/cool.png' class='bbc_emoticon' alt=':(' />

        MessageBox.Show(a)



عندما اجرب هذا الكود واغير قيمة b وجدت الملاحظات التالية

وهو مرة يقرب للعدد الاكبر ومرة يلغي التقريب اي لم اجد منطق فية ولا تفسير

قيمة b المدخلة1.5
قيمة a المستخرجة2

قيمة b المدخلة2.5
قيمة a المستخرجة2

قيمة b المدخلة3.5
قيمة a المستخرجة4

قيمة b المدخلة4.5
قيمة a المستخرجة4

قيمة b المدخلة 5.5
قيمة a المستخرجة6

قيمة b المدخلة 6.5
قيمة a المستخرجة6


#2 ahmedbb

ahmedbb

    عضو مميز

  • الأعضــاء
  • 935 مشاركة
  • البـلـد: Country Flag

تاريخ المشاركة 14 May 2011 - 10:47 AM

الاخ الكريم
لاحظت ان دائما المخرجات تكون اعداد زوجية
دا طبعا مش تفسير ولكن ملاحظة فقط
دا ممكن يساعد فى ايجاد التفسير
هل هذه الدالة تقرب لاقرب عدد زوجى فقط (يمكن)
معكم ولكم نتواصل
م احمد

"وفوق كل ذى علم عليم"
برامج من انتاجى
شئون العاملين - الحضور و الانصراف - الاستحقاقات و الاجور
ادارة المراكز التدريبية - متابعة الانتاج - ادارة المستشفيات والعيادات - نظام ادارة المعارض ونقاط البيع
برنامج ادارة حركة السيارات - برنامج ادارة المكتبات - برنامج إدارة المدارس والمعاهد
من مواضيعى:
منادة المنيو من اى مكان http://www.araboug.o...nu&fromsearch=1
ايجاد اجمالى حقل معين فى فورم تابلور http://www.araboug.o...showtopic=50174
الوظيفة
Oracle Developer - Data Base Administrator - Programmer

Oracle Instructor

اسكاى بى ahmedoracle74
ahmedbb_work@hotmail
ahmedbb_work@yahoo

 

00201208042608

 

00201142271287
القاهرة - مصر




احمد محمود


#3 Amgad

Amgad

    مشرف عام ومشرف قسم تحليل النظم

  • الفريق الإداري
  • 4,558 مشاركة
  • الاسم الأول:امجد
  • اسم العائلة:حلمي
  • البـلـد: Country Flag
  • المنصب الحالي:Business Systems Analyst at al Fanar Co. Riyadh KSA

تاريخ المشاركة 14 May 2011 - 10:12 PM

السلام عليكم ورحمة لله

بحثت لك فى النت وجدت ملاحظة الأخ / احمد ... صحيحه ... فهذه الوظيفة تقرب الى اقرب رقم زوجي ولا تقرب الى اقرب رقم فردي
وهذا هو السبب ( انه اذا كانت هناك مجموعه كبيرة من الأرقام يراد جمعها فلايحدث تجميع لجميع نتائج الوظيفة مقربه ... وانما يكون هناك جزء مقرب وأخر غير مقرب )

When the fractional part of a value is exactly 0.5, the CInt function rounds to the closest even number.
For example,
0.5 rounds to 0,
1.5 rounds to 2,
and 3.5 rounds to 4.
The purpose of rounding to the closest even number is to compensate for a bias that could accumulate when many numbers are added together

مصدر المعلومة.


لا إله إلا الله الحليم الكريم
لا اله إلا الله العلى العظيم
لا اله إلا الله رب السماوات السبع و رب العرش العظيم
‏اللهم ارزقني قبل الموت توبة وعند الموت شهادة وبعد الموت جنة
اللهم ارزقني حسن الخاتمة
اللهم هون علينا سكرات الموت ... ونور علينا قبورنا
اللهم ارزقني الموت وأنا ساجد لك يا ارحم الراحمين
اللهم ثبتني عند سؤال الملكين
اللهم اجعل قبري روضة من رياض الجنة ولا تجعله حفرة من حفر النار
اللهم اني اعوذ بك من فتن الدنيا
اللهم ارحم ابائنا وامهاتنا واغفر لهما وتجاوز عن سيئاتهما وادخلهم فسيح جناتك ... والحقنا بهما يا رب العالمين
اللهم ارحم موتانا وموتى المسلمين واشفي مرضانا ومرضى المسلمين
اللهم اغفر للمسلمين والمسلمات والمؤمنين والمؤمنات الأحياء منهم والأموات
وبارك اللهم على سيدنا محمد صلى الله عليه وسلم
اللهم آمين ... اللهم آمين ... اللهم آمين


....


#4 scince

scince

    عضو مميز

  • فريق الإشراف
  • 1,118 مشاركة
  • الاسم الأول:ميهال
  • اسم العائلة:مهدي
  • البـلـد: Country Flag
  • الاهتمامات:البرمجة على vc++ و# c وAndroid للموبايل
    Arduino الإلكترونيات التفاعلية و المتحكمات الد قيقة ودمجها مع اوراكل في الجانب الالكتروني من الانطمة

تاريخ المشاركة 14 May 2011 - 11:00 PM

السلام عليكم جميعاً
كما تفضل الاخ احمد والمشرف الرائع أمجد أنه ترجع دائما أعداد زوجية والاعداد الزوجية هي من الاعداد الصحيحة الدالة وظيفتها تحويل القيم الى عدد صحيح والمقصود بهذا أنها تقبل القسمة الصحيح أي DIVISION
DIV كما تسميها بعض اللغات وهي إختصار لعبارة CONVERT TO INTEGER وفي ملاحظتك أنها مرة تقرب الى عدد ومرة لاتقرب والسبب أنها اذا كان التقريب سيسفر عنه عدد صحيح قربت وإذا الناتج لم يكون عدد صحيح تلغي الكسر طبعاً في حالة المتغبر من نوع VARIANCE مثلاً في لغة VB وايضاً إذا أدخلت قيمة في مربع نص في لغة VB فإن الراجع منها نوعه نصي ومن أجل التعاملات السابقة بالقسمة الصحيحة تستخدم هذه الدالة وأقصد مثلاً ( A = CINT( TEXT1.TEXT
وتستخدم الدالة القيم الصحيحة المحصورة بين القيمتين 32768- و 32767
هذا والله أعلم
وفقك الله
أخوك ....

م / ميهال مهدي - اليمن - عدن
من مواضيعي :

شاشة تكرار السطر الاخير من البلوك بعدد ما تريد من المرات

شاشة تقراء بيانات من Ms Excel الى جدول قاعدة بيانات أو الى بلوك في الشاشة مباشرة

رسال بيانات الى Ms Word 2007 لملف موجود مسبقا من شاشة ديلفوبر 6i باستدعاء دوال Vba

شاشة تعرض الماك ادرس و سيريال الماذربورد لمن يريدون تأمين برامجهم
شاشة تظهر الطابعة الافتراضية وتعين طابعة افتراضية انت تحدد اسمها

هل تعاني من مشكلة الاقواس في المسار
ارسال بيانات الى Ms Word 2007 من شاشة ديفلوبر 6i
شاشة إظهار Ip الخارجي والداخلي وعدة معلومات
استخدام اردوينو التحكم بدائرة كهربائية 220 فولت من خلال شاشة ديفلوبر اوراكل
شاشة قراءة رقم الهرديسك الفيزيائي بواسطة Dll على Dev 10g
قراءة بيانات الهرديسك بواسطة Activex
طريقة تشفير بيانات الهرديسك بواسطة Md5
شاشة التحكم بالمخرج Lpt بواسطة Dll على 10g و 6i
تطوير لمثال شاشة التحكم بالمخرج Lpt بواسطة Dll على 10G و 6I
شاشة تتحكم بألأزرار Caps_Lock و Num_Lock و Scrol_Locl بواسطة Dll
شاشة تحسس حالة زر Cpas Lock بواسطة Dll
شاشة تسجيل بشكل مرن التغيرات لجداول أي مستخدم وحفظها في جدول أنت تنشئه
مراقبة مستخدمين النظام انياً و تسجيل بيانات جلسة العمل
(مفاجئة)شاشة Template تم تجهيزها بواسطة الــ Object Group
إحضار بيانات من Msaccess الى Oracle
أداة تقوم بتغيير كلمة السر في أوراكل
الان يمكنك التحكم بتريجرات ازرار الوظائف Key Mapping F1-F9


#5 انريكي

انريكي

    عضو نشط

  • الأعضــاء
  • 335 مشاركة
  • البـلـد: Country Flag
  • الاهتمامات:Programming

تاريخ المشاركة 15 May 2011 - 01:00 AM

كل الشكر لكم أخواني الأعزاء على المعلومات المفيدة

بارك الله فيكم وجزاكم عني كل خيررررر إن شاء الله