فبا (البصرية الأساسية للتطبيقات) البرمجة غالبا ما تستخدم لأتمتة المهام في تطبيقات مايكروسوفت أوفيس مثل إكسيل ، وورد ، والوصول. واحدة من المهام الشائعة التي قد تواجه مبرمج فبا هو تقريب الأرقام إلى عدد معين من المنازل العشرية.
لتقريب الأرقام في فبا إلى 2 المنازل العشرية ، يمكنك استخدام وظيفة الجولة. تأخذ هذه الوظيفة وسيطتين: الرقم المراد تقريبه وعدد المنازل العشرية لتقريب الرقم إلى. على سبيل المثال ، إذا أردنا تقريب الرقم 3.14159 حتى 2 منازل عشرية ، يمكننا استخدام الكود التالي:
الرقم = 3.14159
- تقريب خافترقم مزدوج
- الرقم = 3.14159
- روندنومبر = ووركشيتفونكتيون.تقرير اخبارى (عدد, 2)
- بعد تنفيذ هذا الرمز ، سيحتوي متغير الرقم المستدير أيضا على الرقم 3.14. يرجى ملاحظة أنه لاستخدام وظيفة تقرير اخبارى ، يجب علينا إضافة بادئة ورشيتفونكتيون ، لأن هذه الوظيفة هي وظيفة إكسيل المضمنة وغير متوفرة مباشرة في فبا.
- طرق تقريب الأرقام في فبا
- أمثلة على تقريب الأرقام في فبا
1. باستخدام وظيفة التنسيق
2. باستخدام وظيفة الجولة
3. باستخدام وظيفة كثافة العمليات
سؤال وجواب
كيف يمكنني تقريب رقم إلى 2 منازل عشرية في فبا?كيف يمكنني تقريب رقم إلى 2 منازل عشرية دون استخدام وظيفة جولة في فبا?
هل من الممكن تقريب رقم إلى 2 المنازل العشرية في فبا مع الأرقام السالبة?
كيف يمكنني تقريب رقم إلى 2 منازل عشرية في فبا باستخدام وظيفة تنسيق?
طرق تقريب الأرقام في فبا
الطريقة
جولةهي واحدة من أسهل الطرق لتقريب الأرقام في فبا. يسمح لك بتقريب الرقم إلى عدد محدد من المنازل العشرية.
ديم الأسطوانات كما مزدوجة
الأسطوانات = 3.14159
الأسطوانات = جولة (الأسطوانات ، 2)
الطريقة
الشكلانها تسمح لك ليس فقط لتقريب الأرقام ، ولكن أيضا لتنسيق انتاجها. يقبل معلمتين: الرقم المراد تقريبه وقالب التنسيق.
ديم الأسطوانات كما مزدوجة
الأسطوانات = 2.71828
الأسطوانات = تنسيق (الأسطوانات، "0.00")
الأسطوانات = 4.9
الأسطوانات = كثافة العمليات (الأسطوانات ) سيكون الرقم مساويا لـ 4
4. طريقة السقف والأرضية
الأساليب
السقف
و
الطابق
يستخدم لتقريب الأرقام لأعلى ولأسفل ، على التوالي. أنها تتطلب اتصال مكتبة
num = 1.6
num = Application.WorksheetFunction.Floor(num, 1)' num будет равно 1
5. Метод ROUNDUP и ROUNDDOWN
Методы
RoundUp
и
RoundDown
также позволяют округлить число вверх и вниз соответственно. Они также требуют подключения библиотеки
Application.WorksheetFunction
.
Dim num As Double
num = 1.6
num = Application.WorksheetFunction.RoundDown(num, 0)' num будет равно 1
وأخيرا ، فبا يوفر عدة طرق لتقريب الأرقام. يعتمد اختيار طريقة معينة على النتيجة المرجوة وقدرات اللغة.
أمثلة على تقريب الأرقام في فبا
الشكل
يسمح لك بتعيين تنسيق الأرقام وتقريبه إلى العدد المطلوب من المنازل العشرية.
الرقم المستدير = التنسيق (الرقم ، "0.00") ' التقريب إلى منزلتين عشريتين
ونتيجة لذلك ، فإن متغير العدد المستديرسوف تحتوي على القيمة
3.14
جولة
تقريب الرقم إلى العدد المحدد من المنازل العشرية.
تقريب عدد = جولة (عدد ، 2) ' التقريب إلى منزلتين عشريتين
ونتيجة لذلك ، فإن متغير العدد المستديرسوف تحتوي على القيمة
3.14
كثافة العمليات
إرجاع الجزء الصحيح من الرقم. إذا كان الرقم سالبا ، يحدث التقريب باتجاه الصفر.
تقريب عدد = كثافة العمليات (عدد * 100) / 100 ' التقريب إلى منزلتين عشريتين
ونتيجة لذلك ، فإن متغير العدد المستديرسوف تحتوي على القيمة
3.14
إصلاح
إرجاع الجزء الصحيح من الرقم. إذا كان الرقم سالبا ، فسيحدث التقريب باتجاه رقم أصغر.
تقريبرقم = إصلاح (رقم * 100) / 100 ' التقريب إلى منزلتين عشريتين
ونتيجة لذلك ، فإن متغير العدد المستديرسوف تحتوي على القيمة
3.14
المركز
يحول رقما إلى قيمة عشرية ويقربه إلى العدد المحدد من المنازل العشرية.
رقم خافت كما مزدوج
تقريب خافترقم مزدوج
عدد = 3.14159265359
تقريبرقم = كديك (عدد) ' التقريب إلى منزلتين عشريتين
ونتيجة لذلك ، فإن متغير العدد المستدير
سوف تحتوي على القيمة
3.14
.