منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كود الغاء علامة السالب فى ناتج الطرح - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : كود الغاء علامة السالب فى ناتج الطرح (/showthread.php?tid=21545)



كود الغاء علامة السالب فى ناتج الطرح - الحلوانى - 01-09-17

الاخوه الافاضل مشرفين و اعضاء

كل الخير والمحبه والتقدير لكم
كل عام وانتم بخير جميعا

فيجوال بيسك 6
فى حالة
عند طرح رقم من رقم فيكون الناتج بالسالب
 تكست 4  =     (تكست 1 + تكست 2 ) - تكست 3
تكست 4 =(  40 + 30) - 90    =    - 20 

اريد كود فى حالة الناتج بالسالب  يحول الناتج نفس الرقم ولكن بالموجب

   -20     تحول الى     20
شكرا لكم


RE: كود لالعاء علامة السالب فى ناتج الطرح - حريف برمجة - 01-09-17

(01-09-17, 10:00 AM)الحلوانى كتب : الاخوه الافاضل مشرفين و اعضاء

كل الخير والمحبه والتقدير لكم
كل عام وانتم بخير جميعا

فيجوال بيسك 6
فى حالة
عند طرح رقم من رقم فيكون الناتج بالسالب
 تكست 4  =     (تكست 1 + تكست 2 ) - تكست 3
تكست 4 =(  40 + 30) - 90    =    - 20 

اريد كود فى حالة الناتج بالسالب  يحول الناتج نفس الرقم ولكن بالموجب

   -20     تحول الى     20
شكرا لكم


كود :
Text4.Text = Abs(Text4.Text)



RE: كود لالعاء علامة السالب فى ناتج الطرح - Ahmed_Mansoor - 01-09-17

أهلا بك أخي الكريم ، كل عام وأنت والأمه الإسلاميه بخير وصحه وسلامه ، الدالة abs ترجع الرقم الممر لها إلى موجب دائما سواء كان الرقم سالب أو موجب ، إستخدمها بالطريقه التاليه :

PHP كود :
Text4.Text Abs((30 40) - 90



RE: كود لالعاء علامة السالب فى ناتج الطرح - الحلوانى - 01-09-17

شكرا لك اخ حريف برمجه وكل عام وانتم بخير


شكرا لكم الاستاذ / احمد منصور دائما سباق بالخير وكل عام وانتم بخير