[حريف برمجة]

(23-01-16, 09:02 PM)حافظ حافظ كتب : السلام عليكم
أحبابي الاخوة الأشقاء اتشرف باالانضمام اليكم
منتدى رائع ربنا يبارك لكم في مجهوداتكم التي تقدموها لخدمة الاعضاء
تعبت في البحث عن نتيجة التي اريدها و املي ان اجد من يساعدني واكون له من الشاكرين
كيف اجعل النتيجة في التاكست 6 مقربة إلى العشرات الأصغر
شرحت الموضوع على الفورم للتوضيح
بارك الله فيكم اخواني على المساعدة

وعليكم السلام

جرب الاسطر التاليه :

كود :

Text6.Text = Val(Text1.Text) - (Val(Text2.Text) + Val(Text3.Text) + Val(Text4.Text) + Val(Text5.Text))
Text6.Text = Fix(Text6.Text)

Text6.Text = Val(Text6.Text) - Right(Text6.Text, 1)
Text6.Text = Format(Text6.Text, "0.00")