اقتباس:
المشاركة الأصلية كتبت بواسطة صدى الصمت
السلام عليكم ورحمة الله وبركاته
أنا كتبت كود بس ابغى أتاكد قبل ما أسلم المشروع اذا الكود صحيح أو لا
أتمنى انو في احد يقدر يفيدني
وهذا هو الكود اللي كتبته
Dim a , b , c , d , e , m As Integer طريقتك صحيحة وهذه صح أيضا بس أفضل
Dim r As Single
a = Text1.Text
b = Text2.Text
c = Text3.Text
d = Text4.Text
e = Text5.Text
m = a + b + c + d + e
r = m / 5
Text6.Text = m
Text7.Text = r
بلييز لا تتاخرون علي في الرد
ويعطيكم العافية
|
إذا كانت عمل البرنامج السابق هو
إدخال 5 أعداد في مربعات نص text1,text2,text3,text4,text5
وحساب المجموع ووضعه في مربع نص text6
و حساب المعدل ووضعه في مربع نص text7
إذا الكود صح إن شاء الله
وبالتوفيق