06-06-20, 06:40 AM
06-06-20, 09:28 AM
وعليكم السلام ورحمة الله
اضرب القيمة * 100 تقسيم مجوع العدد
-----
وهذا مثال للتتبين لك الصورة
ضع Textbox عدد 4 و Label عدد 4 وتركها بتسميتها الافتراضية
اجعل كل ليبل يقابل تكست بكس Textbox1 يقابلة Label1
وضع هذا الكود
اضرب القيمة * 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