+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=19385)
مساعدة في عمل خصم نسبة مئوية - VB.NET - 23-02-17
السلام عليكم
احتاج معرفة الكود الخاص بالنسبة المئوية
مثلا
لدي تكست1 فيه مبلغ 360
ولدي تكست فيه 20
اريد خصم ال 20 %
من ال 360
يعني ان اجري عملية خصم بنسبة مئوية عشرين بالمية على الاجمالي
RE: مساعدة في عمل خصم نسبة مئوية - Ashraf Elafify - 23-02-17
اخى العزيز
تفضل الكود التالى لإعطاء النسبه المئويه
كود :
Text3.Text = 0
Text3.Text = Val(Text1.Text) * Val(Text2.Text) / 100
Text3.Text = " " & Text3.Text & " %"وتفضل المثال التالى
RE: مساعدة في عمل خصم نسبة مئوية - sendbad100 - 23-02-17
الله يعطيك العافية اخي / Ashraf Elafify
طريقة جميلة
RE: مساعدة في عمل خصم نسبة مئوية - Ashraf Elafify - 23-02-17
عذرا أخى
تفضل بعد اضافه خانه الاجمالى
كود :
Text3.Text = 0
Text3.Text = Val(Text1.Text) * Val(Text2.Text) / 100
Text4.Text = Val(Text1.Text) - Val(Text3.Text)
Text3.Text = " " & Text3.Text & " %"وبارك الله فيك اخى الكريم سندباد