منتديات حاسبكو المتخصصة بمادة الحاسب الآلي

منتديات حاسبكو المتخصصة بمادة الحاسب الآلي (http://www.7asabco.org/index.php)
-   الصف الثالث ثانوي (http://www.7asabco.org/forumdisplay.php?f=81)
-   -   حل المشروع الثالث صفحة 156 فيجوال بيسك (http://www.7asabco.org/showthread.php?t=11114)

Chairman 12-25-2010 07:33 PM

حل المشروع الثالث صفحة 156 فيجوال بيسك
 
1 مرفق
السلام عليكم ورحمة الله وبركاته
تلبية لطلب احد الاعضاء
هذا حل للمشروع الثالث في منهج ثالث ثانوي الفصل الدراسي الاول صفحة 156
والذي نص السؤال فيه يقول

( قم بكتابة برنامج باستخدام لغة فيجوال بيسك يقوم بادخال درجات طالب في المواد الشرعيه وهي ( قران كريم -الفقه - التوحيد - التفسير - الحديث) ثم يقوم البرنامج بحساب مجموع هذه الدرجات وطباعة المتوسط الحسابي لها
علما بأن المتوسط = مجموع الدرجات / عدد الدرجات

متميزه 12-25-2010 09:11 PM

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

Chairman 12-25-2010 09:46 PM

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

ملاذ99 12-26-2010 01:43 AM

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

طالب المزيد 12-26-2010 02:00 AM

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

جميل جدا ما فعلت

موفق إن شاء الله

Chairman 12-26-2010 09:49 AM

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
ملاذ طالب المزيد شكرا على مروركم واتمنى لي ولكم التوفيق و للجميع

كبرياء الجرح 01-06-2011 12:02 AM

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

بس عندي سؤال
الأكواد كيف أقدر آخذهم؟

متميزه 01-06-2011 10:45 AM

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
اخذ الاكواد .. التعامل معه مثل اي نص .. بالنسخ واللصق .. :^^:

كبرياء الجرح 01-06-2011 02:01 PM

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
بس كيف اقدر اظهر الكود وأخذه ؟؟
وشكرا^^
لان تسليم المشاريع يوم السبت ومافي وقت

متميزه 01-06-2011 06:12 PM

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
من داخل برنامج فجول افتحي الفورم وبعدين دبل كلك على زر الامر حساب المتوسط او المجموع .. تظهر شاشة الاكود

تماراTMARA 01-06-2011 07:34 PM

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
جزاك الله كل خير
مجهود رائع

كبرياء الجرح 01-07-2011 01:58 AM

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

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

صدى الصمت 01-08-2011 07:41 PM

مشاركة: حل المشروع الثالث صفحة 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

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

طالب المزيد 01-08-2011 08:46 PM

مشاركة: حل المشروع الثالث صفحة 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

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

وبالتوفيق

صدى الصمت 01-08-2011 09:57 PM

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
شكرا اخ طالب المزيد
نبهتني على غلط في الكود ما انتبهت عليه انا
e=Text5.Text

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

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

طالب المزيد 01-08-2011 10:12 PM

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

المشاركة الأصلية كتبت بواسطة صدى الصمت (المشاركة 133037)
شكرا اخ طالب المزيد
نبهتني على غلط في الكود ما انتبهت عليه انا
e=text5.text

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

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

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

صدى الصمت 01-08-2011 10:41 PM

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
1 مرفق
شكرا للمساعدة أدري ثقلتها الموضوع ما يستاهل بس المعلمات يتفننون في التعذيب

Chairman 01-08-2011 11:39 PM

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

المشاركة الأصلية كتبت بواسطة صدى الصمت (المشاركة 133042)
شكرا للمساعدة أدري ثقلتها الموضوع ما يستاهل بس المعلمات يتفننون في التعذيب

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

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

كود PHP:

Private Sub Command1_Click()
Dim a As IntegerAs IntegerAs IntegerAs IntegerAs IntegerAs IntegerAs Single
Text1.Text
Text2.Text
Text3.Text
Text4.Text
Text5.Text
e
5
Label8
.Caption m
Label9
.Caption r
End Sub 

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

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

كود PHP:

Dim a As IntegerAs IntegerAs IntegerAs IntegerAs IntegerAs IntegerAs Single
Text1.Text
Text2.Text
Text3.Text
Text4.Text
Text5.Text
 
Label8
.Caption 

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


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

Dim a As IntegerAs IntegerAs IntegerAs IntegerAs IntegerAs IntegerAs Single
Text1.Text
Text2.Text
Text3.Text
Text4.Text
Text5.Text
 
Label9
.Caption = (e) / 5
End Sub 

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

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

طالب المزيد 01-09-2011 12:41 AM

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

المشاركة الأصلية كتبت بواسطة صدى الصمت (المشاركة 133042)
شكرا للمساعدة أدري ثقلتها الموضوع ما يستاهل بس المعلمات يتفننون في التعذيب


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

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

طاسه 01-10-2011 10:52 PM

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

Essa saad 01-11-2011 10:02 PM

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

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

خطأ. وهل اعتقد أن الإختصار أفادني.

Private Sub Command1_Click()

text 6 .text.=text1.text+text 2.text+text3.text +text4.text+text5.text
وهذه تمثل مجموع الدرجات
________________________________________________

Private Sub Command2_Click()


5/ ( text7 .text.= (text1.text+text 2.text+text3.text +text4.text+text5.text

وهذا يمثل المتوسط الحسابي..

ياليت تفيدوني إذا كان في الكود خطأ .. لأن بصراحه ما أحس إني فهمت من المدرس

وبالتوفيق أنشاء الله للجميع

Chairman 01-11-2011 11:12 PM

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

المشاركة الأصلية كتبت بواسطة Essa saad (المشاركة 133141)
السلام عليكم ورحمة الله وبركاته

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

خطأ. وهل اعتقد أن الإختصار أفادني.

Private Sub Command1_Click()

text 6 .text.=text1.text+text 2.text+text3.text +text4.text+text5.text
وهذه تمثل مجموع الدرجات
________________________________________________

Private Sub Command2_Click()


5/ ( text7 .text.= (text1.text+text 2.text+text3.text +text4.text+text5.text

وهذا يمثل المتوسط الحسابي..

ياليت تفيدوني إذا كان في الكود خطأ .. لأن بصراحه ما أحس إني فهمت من المدرس

وبالتوفيق أنشاء الله للجميع


يااخي اعتقد لوانك ركزت مع المعلم كان سهلت عليك المساله
لكن على العموم
ابغاك تسال نفسك ماهي نوع الاعداد الموجوده في text
وليش تلخبط نفسك بكتابه اسم التكست وانت تقدر تستغني عن ذلك لو حطيتها في متغيرات
طبق الخطوات هذي وان شالله تمشي معك

الخطوه الاولى تعريف متغيرات للتكست وتكون اعداد صحيحه من نوع integer راجع كتابك ص 31على ماذكر لتعرف انواع المتغيرات
كود PHP:

Dim a As IntegerAs IntegerAs IntegerAs IntegerAs Integer 

هذي لخمس صناديق نصيه

الخطوه الثانيه اسناد الصناديق للمتغيرات بحيث كل تكست تربطه مع متغير زي كذا
كود PHP:

Text1.Text
Text2.Text
Text3.Text
Text4.Text
Text5.Text 

الخطوه الثالثه يكون عندك زرين زر تجمع بواسطته الدرجات المدخله وزر اخر يحسب المتوسط
هذا الجمع الي سويته انت
كود PHP:

(text 6 .text.=text1.text+text 2.text+text3.text +text4.text+text5.text


وهذي الطريقه الي اقولك عليها وانت شوف ايهما افضل انا بخلي الجمع يظهر في label

كود PHP:

Label1.Caption 

بنفس الطريقه لزر المتوسط ارجع عرف المتغيرات لصناديق النص ثم سوي عملية الاسناد
وبعد كذا الكود لزر المتوسط
كود PHP:

Label2.Caption = (e) / 

بالتوفيق

Essa saad 01-13-2011 06:14 PM

مشاركة: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
يعطيك العافيه
والله ماقصرت ...
وأبشرك أخذت الدرجة الكامله في الإختبار ولله الحمد ...

طالب المزيد 01-13-2011 06:26 PM

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

المشاركة الأصلية كتبت بواسطة Essa saad (المشاركة 133172)
يعطيك العافيه
والله ماقصرت ...
وأبشرك أخذت الدرجة الكامله في الإختبار ولله الحمد ...

يالله مبروك .. والله يوفقك

خذ من عندي لاب توب هدية :m00ktrg:

وعقبال ما تجيب الدرجة الكاملة في النظري

حطموكـ ياقلبي 09-06-2011 12:05 AM

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

道频 شايف وساكت 频道 09-06-2011 04:19 PM

رد: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
شكراً جزيلاً لك.

ق ل ق 6 6 6 09-06-2011 10:56 PM

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

جزاك الله الف خير

اليزيد 09-07-2011 01:33 AM

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

teach me2007 12-10-2012 12:35 AM

رد: حل المشروع الثالث صفحة 156 فيجوال بيسك
 
موفق إن شاء الله

مجمع العين 12-14-2012 02:48 PM

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


الساعة الآن 03:01 AM.

Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2025, vBulletin Solutions, Inc. Trans by
جميع الحقوق محفوظة لدى موقع ومنتديات حاسبكو 1431هـ/1432هـ

a.d - i.s.s.w