+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مساعده في حساب النسبة المئوية (/showthread.php?tid=35135)
مساعده في حساب النسبة المئوية - alshandodi - 06-06-20
السلام عليكم ورحمة الله وبركاته
ما هي الطريقه لحساب النسبة المئوية للفرق بين سعر الشراء وسعر البيع
ولكم مني جزيل الشكر والتقدير
RE: مساعده في حساب النسبة المئوية - سامي محمد - 06-06-20
وعليكم السلام ورحمة الله
اضرب القيمة * 100 تقسيم مجوع العدد
-----
وهذا مثال للتتبين لك الصورة
ضع Textbox عدد 4 و Label عدد 4 وتركها بتسميتها الافتراضية
اجعل كل ليبل يقابل تكست بكس Textbox1 يقابلة Label1
وضع هذا الكود
كود :
Dim I As Integer = Val(TextBox1.Text) + Val(TextBox2.Text) + Val(TextBox3.Text) + Val(TextBox4.Text)
For x As Integer = 1 To 4
Controls("Label" & x).Text = Controls("TextBox" & x).Text * 100.0 / I
Next