الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

طلب بسيط أرجو تحقيقه ما أمكن مشكورين

بدأه azoz100 في 20 مارس 2009 · 1 رد · 440 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

مربوطه بقاعدة البيات ربط صحيح وجميع الامور ماشية تمام والأوامر كذلك

المشكلة :

أن التكست الأخير مهمته يجمع ثلاثة تكستات جواره

ثم يقسم على رقم 3

المطلوب :

هل هناك داله معينة تمكنني من تقريب الكسر إلى عدد صحيح ؟

أتمنى ذلك من الجميع العون بعد الله

3/(text1.text =val( text2.text )+ val (text3.tex

يعني أبغة من التكست 1 يجمع التكستات اللي جواره ثم يقسم على 3 ويظهر لي عدد مقرب صحيح

ولكم تحياتي

#2
azoz100 كتب:
3/(text1.text =val( text2.text )+ val (text3.tex

	text1.text = round(val( text2.text )+ val (text3.tex ),0)

الدالة Round تقرب العدد الى اقرب 10

تحياتي

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…