منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ارجو المساعده - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : الأقسام التعليمية - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=90)
+--- قسم : مكتبة أكواد المنتدى (http://vb4arb.com/vb/forumdisplay.php?fid=111)
+---- قسم : مكتبة أكواد الفيجوال بيسك 6 (http://vb4arb.com/vb/forumdisplay.php?fid=116)
+---- الموضوع : ارجو المساعده (/showthread.php?tid=14240)



ارجو المساعده - AhmedALasaly - 26-12-15

Write a program to enter the name of a student and two marks of any subject by input box then computes the average and display the name and average in two labels


RE: ارجو المساعده - احمداحمداحمد6 - 26-12-15

sum=0
count=0
x=inputbox("enter name of student",,)
read(n
for i = 1 to n
w=inputbox("enter subject",,)
next i
read (z
for i = 1 to z
x1=inputbox("enter mark1",,)
x2=inputbox("enter mark2",,)
)sum=sum+(x1+x2
count=count+1
next i
avr=sum/count
data1.feild1=avr
data1.feild2=name

...................................,
bye