منتديات حاسبكو المتخصصة بمادة الحاسب الآلي - حل المشروع الثالث صفحة 156 فيجوال بيسك

- الصف الثالث ثانوي (http://www.7asabco.org/forumdisplay.php?f=81)

- - حل المشروع الثالث صفحة 156 فيجوال بيسك (http://www.7asabco.org/showthread.php?t=11114)

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

جزاك الله كل خير
مجهود رائع

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

ماتقصروووون

ربــــــــــــــــي يجزاكم الجنه

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

السلام عليكم ورحمة الله وبركاته

أنا كتبت كود بس ابغى أتاكد قبل ما أسلم المشروع اذا الكود صحيح أو لا
أتمنى انو في احد يقدر يفيدني
وهذا هو الكود اللي كتبته

Dim a As Integer, b As Integer, c As Integer, d As Integer, e As Integer, m As Integer, r As Single
a = Text1.Text
b = Text2.Text
c = Text3.Text
d = Text4.Text
e = Text4.Text
m = a + b + c + d + e
r = m / 5
Text6.Text = m
Text7.Text = r

بلييز لا تتاخرون علي في الرد
ويعطيكم العافية

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

اقتباس:

المشاركة الأصلية كتبت بواسطة صدى الصمت (المشاركة 133031)

السلام عليكم ورحمة الله وبركاته

أنا كتبت كود بس ابغى أتاكد قبل ما أسلم المشروع اذا الكود صحيح أو لا
أتمنى انو في احد يقدر يفيدني
وهذا هو الكود اللي كتبته

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

إذا الكود صح إن شاء الله

وبالتوفيق

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

شكرا اخ طالب المزيد
نبهتني على غلط في الكود ما انتبهت عليه انا
e=Text5.Text

يعطيك العافية
بس ما ادري لما جيت انفذه قلت بغير وخزنت المجموع والمتوسط في خاصية Lable8.Caption=m
Lable9.Caption=r

ما يغير شي في الكود يعني يعتبر صحيح ولا ؟؟

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

اقتباس:

المشاركة الأصلية كتبت بواسطة صدى الصمت (المشاركة 133037)

شكرا اخ طالب المزيد
نبهتني على غلط في الكود ما انتبهت عليه انا
e=text5.text

يعطيك العافية
بس ما ادري لما جيت انفذه قلت بغير وخزنت المجموع والمتوسط في خاصية lable8.caption=m
lable9.caption=r

ما يغير شي في الكود يعني يعتبر صحيح ولا ؟؟

لو تضعي المشروع كامل مع الفورم عشان اشوف التصميم هل هو يلائم الكود

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

شكرا للمساعدة أدري ثقلتها الموضوع ما يستاهل بس المعلمات يتفننون في التعذيب

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

اقتباس:

المشاركة الأصلية كتبت بواسطة صدى الصمت (المشاركة 133042)

شكرا للمساعدة أدري ثقلتها الموضوع ما يستاهل بس المعلمات يتفننون في التعذيب

برنامجك حلو بس يبغى بعض التعديلات البسيطه وماثقلتيها على احد انتي تبغي تتعلمي

هذا هو الكود الي سويتيه

كود PHP:


		
			
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer, d As Integer, e As Integer, m As Integer, 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
Label8.Caption = m
Label9.Caption = r
End Sub

انتي حطيتي متغيرات M-r وكان تقدري تستغني عنها باظهار النتيجه مباشره في label

يعني يكون الكود الموضوع في زر المجموع

كود PHP:


		
			
Dim a As Integer, b As Integer, c As Integer, d As Integer, e As Integer, m As Integer, r As Single
a = Text1.Text
b = Text2.Text
c = Text3.Text
d = Text4.Text
e = Text5.Text
 
Label8.Caption = a + b + c + d + e

يعني تختاري بان النتيجه تظهر مباشره في label8

ويكون الكود الذي يظهر في زر المتوسط

كود PHP:


		
			
Dim a As Integer, b As Integer, c As Integer, d As Integer, e As Integer, m As Integer, r As Single
a = Text1.Text
b = Text2.Text
c = Text3.Text
d = Text4.Text
e = Text5.Text
 
Label9.Caption = (a + b + c + d + e) / 5
End Sub

تختاري ظهور النتيجه بعد اجراء العميله الحسابيه في label9

ان شالله وضحت الفكره

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

اقتباس:

المشاركة الأصلية كتبت بواسطة صدى الصمت (المشاركة 133042)

شكرا للمساعدة أدري ثقلتها الموضوع ما يستاهل بس المعلمات يتفننون في التعذيب

بس في النهاية لو تعرفي .. أنت مستفيده

" و راح تتذكري كلامي هذا "

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك

الله يعافيك