+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : اريد ضرب الكمية في السعر وإظهار الناتج برقمين بعد الفاصلة (/showthread.php?tid=13982)
اريد ضرب الكمية في السعر وإظهار الناتج برقمين بعد الفاصلة - abde6726 - 01-12-15
في المثال المرفق
في اعمدةMSFlexGrid
اريد ضرب الكمية في السعر 15.45*50 = اريد الناتج كما هو اي بالفاصلة اي 772.50
المثال
http://up.top4top.net/downloadf-top4top_db044735f91-rar.html
RE: طلب مساعدة - HASAN6.0 - 01-12-15
اخي الكريم يمكنك عرض الرقم بالصيغه ( Format ) التي تريدها فمثلاً
PHP كود :
Text1.Text = Format(15.45 * 50, "#0.000") ' 772.500
Text1.Text = Format(15.45 * 50, "#0.00") ' 772.50
Text1.Text = Format(15.45 * 50, "#0.0") ' 772.5
RE: طلب مساعدة - abde6726 - 01-12-15
اخي الكريم ولكن في MSFlexGrid لا يقبل ذلك من خلال عملية ضرب العمود الكمية قي السعر
حسب المثال المرفق
شكرا
RE: اريد ضرب الكمية في السعر وإظهار الناتج برقمين بعد الفاصلة - Ahmed_Mansoor - 05-12-15
أهلا أخي الكريم , تستطيع أيضاُ إستخدام الدالة : FormatNumber , كمايلي :
كود :
FormatNumber(RSS![ItmPrice] * 15, 2, True, True, True)حيث أن الرقم 2 يدل على عدد الأرقام بعد الفاصلة , تم تعديل المثال المرفق .
RE: اريد ضرب الكمية في السعر وإظهار الناتج برقمين بعد الفاصلة - abde6726 - 31-12-15
أهلا أخي الكريم مجددا لقد مشى الحال معي في عملية الضرب و لكن بعد اعادة تنصيب الفجوال بيسك 6 من جديد ضهرت رسالة جديدة تقول run ti;e error 13
في الكود :.TextMatrix(.Row, 5) = FormatNumber(.TextMatrix(.Row, 3) * .TextMatrix(.Row, 4), 2, True, True, True)
وهذا اثناء كتابة رقم بالفاصلة في الفليكس قريد تضهر الرسالة السابق ذكرها
RE: اريد ضرب الكمية في السعر وإظهار الناتج برقمين بعد الفاصلة - ahmedabdelaliem - 02-01-16
السلام عليكم ورحمة الله وبركاته
اخي الحبيب هذا البرنامج تقريبا كان مثال لي من المنتدى القديم وانا مبرمج أداة AhmedGrid كنت سعيد جدا وانت تستخدمها
كان هناك العديد من الطلبات في المنتدى القديم عن أداة جريد يمكن الكتابة فيها ومن هنا قمت ببرمجة هذه الأداة ووضعت مثال الفاتورة الإصدار الأول والثاني
لك منى كل التقدير
بخصوص سؤالك اخي الحبيب
عدل الكود هكذا وجرب ان شاء الله يشتغل معاك
PHP كود :
.TextMatrix(.Row, 5) = Val(.TextMatrix(.Row, 3)) * Val(.TextMatrix(.Row, 4))
.TextMatrix(.Row, 5) = Format(.TextMatrix(.Row, 5), "0.00")
بالتوفيق
RE: اريد ضرب الكمية في السعر وإظهار الناتج برقمين بعد الفاصلة - abde6726 - 03-01-16
مشى الحال شكرا جزيلا
اخي الكريم نعم انا احذته من المنتدى القديم على ما اذكر لكن
اقدم لك شكري الجزيل على هذا المجهود في المنتدى القد يم او الجديد و الى كل من بذل جهدا في هذا المجال.....
**************
اخي ahmedabdelaliem
وكتبه الله لك في ميزان الحسنات
و شكرا جزيلا مرة اخرى
***********************************