منتدى جزيرة الرياضيات  
     

Left Nav التسجيل التعليمـــات قائمة الأعضاء التقويم البحث مشاركات اليوم اجعل كافة الأقسام مقروءة Right Nav

Left Container Right Container
 

» منتدى جزيرة الرياضيات » الجزيرة التعليمية والفنية » منتدى التعليم الإلكتروني » درس اليوم السادس عشر درس عمل برنامج تعليمي اختيار متعدد

منتدى التعليم الإلكتروني منتدى خاص لعمل دورات تعليمية في البرامج و الورش التعليمية خاصة و تتعلق بالتعليم الإلكتروني

إضافة رد
 
أدوات الموضوع تقييم الموضوع
  #1  
قديم 08-05-2006, 12:06 PM
الصورة الرمزية الاستاذ خليل
الاستاذ خليل الاستاذ خليل غير متواجد حالياً
المدير العام


 
تاريخ التسجيل: Jan 2003
الدولة: مملكة البحرين
المشاركات: 3,977
درس اليوم السادس عشر درس عمل برنامج تعليمي اختيار متعدد

السلام عليكم

هنا الدرس بالصور المفصلة
__________________
هذا من فضل ربي
رد مع اقتباس
  #2  
قديم 08-06-2006, 02:25 PM
fadi9 fadi9 غير متواجد حالياً
عضو

 
تاريخ التسجيل: Jan 2006
المشاركات: 106
السلام عليكم
يعطيك العافية استاذ خليل
و سلمت يداك على المجهود الكبير والشرح الرائع
الان احسست اكثر من اي وقت مضى بالمتعة الحقيقية والفائدة الكبرى
حيث اصبح بالامكان صنع برامج تعليمية باستخدام vb
وشكرا
الملفات المرفقة
نوع الملف: rar الاختيار من متعدد.rar‏ (154.1 كيلوبايت, المشاهدات 1563)
رد مع اقتباس
  #3  
قديم 08-06-2006, 08:37 PM
الصورة الرمزية الاستاذ خليل
الاستاذ خليل الاستاذ خليل غير متواجد حالياً
المدير العام


 
تاريخ التسجيل: Jan 2003
الدولة: مملكة البحرين
المشاركات: 3,977
السلام عليكم

عمل ممتاز اخي فادي اريدك ان تعدل على البرنامج بما يلي تقوم بعمل تقدير للنتائج اقصد بها هل نتيجة الطالب ممتاز ام جيد جدا ام جيد ام مقبول ام ضعيف . هل تستطيع فعل ذلك؟
__________________
هذا من فضل ربي
رد مع اقتباس
  #4  
قديم 08-07-2006, 12:46 PM
fadi9 fadi9 غير متواجد حالياً
عضو

 
تاريخ التسجيل: Jan 2006
المشاركات: 106
الطلب جميل جد اومفيد
ارجو ان يكون المشروع المرفق يحقق المطلوب
الملفات المرفقة
نوع الملف: rar الاختيار من متعدد - معدل.rar‏ (154.3 كيلوبايت, المشاهدات 1315)
رد مع اقتباس
  #5  
قديم 08-07-2006, 03:45 PM
shjooon shjooon غير متواجد حالياً
عضو

 
تاريخ التسجيل: Apr 2006
المشاركات: 61
السلام وعليكم ورحمة الله وبركاته

مشكور استاذنا الفاضل على هذا الجهد الرائع بس لو حبيت اسوي اسئلة عامة فكيف لي ذلك وماذا سيكون الكود المناسب في q ولكم مني جزيل الشكر

للأسف استاذنا الفاضل رفق الواجب وذلك بسبب ظهور مسج الي اثناء عملية الارفاق تقول ان حجم البرامج الذي ارفقه يفوق المسموح رغم اني حاولت كثيرا لكنه لا يستجيب وفي كل مرة الرسالة نفسها فهل توجد طريقة اخرى كي استطيع ان ارفقه
رد مع اقتباس
  #6  
قديم 08-07-2006, 10:38 PM
الصورة الرمزية الاستاذ خليل
الاستاذ خليل الاستاذ خليل غير متواجد حالياً
المدير العام


 
تاريخ التسجيل: Jan 2003
الدولة: مملكة البحرين
المشاركات: 3,977
السلام عليكم

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

و يوجد خطا في التقدير يجب ان يكون هكذا

كود:
Private Sub Cmd_Click()
Dim v As Single
v = Val(sumtrue.Caption) / Val(sumq.Caption)
If 0.9 < v And v <= 1 Then L = "ممتاز"
If 0.8 < v And v <= 0.9 Then L = "جيد جدا"
If 0.7 < v And v <= 0.8 Then L = "جيد"
If 0.6 < v And v <= 0.7 Then L = "مقبول"
If v < 0.6 Then L = " ضعيف "
L.Visible = True
Timer3.Enabled = True
Cmd.Visible = False
End Sub
بالنسبة لشجون اتوقع ان تكون ملفات الصوت كبيرة حاولي ان تجدي اصواتا اقل حجما او ارفعيها على احد المواقع التي تسمح باحجام اكبر.
و انتظر ردكم و اقول ان هل تحتاجون لدروس اخرى الان ؟في ماذا ؟

لاني اريد مشروع من عندكم عبارة عن برنامج تعليمي متكامل .
__________________
هذا من فضل ربي
رد مع اقتباس
  #7  
قديم 08-08-2006, 06:15 PM
fadi9 fadi9 غير متواجد حالياً
عضو

 
تاريخ التسجيل: Jan 2006
المشاركات: 106
السلام عليكم

تم تعديل المشروع مرة ثانية حسب المطلوب
ايضا اصبح يعمل اوتوماتيكيا
لكن اظن ان التقدير بهذة الطريقة غير متبع لطلاب المراحل الابتدائية او الاساسية
بل هو خاص بالجامعات

بالنسبة للمشروع التعليمي المطلوب ان نعمله:
ما طبيعة المشروع وحول اي مواضيع تعليمية يدور؟؟
ارجو التحديد اكثر لنتمكن من صنعه

وشكرا جزيلا
الملفات المرفقة
نوع الملف: rar الاختيار من متعدد.rar‏ (154.3 كيلوبايت, المشاهدات 1106)
رد مع اقتباس
  #8  
قديم 08-08-2006, 08:23 PM
fadi9 fadi9 غير متواجد حالياً
عضو

 
تاريخ التسجيل: Jan 2006
المشاركات: 106
الاخت شجون

اقترحي علينا مشروعا تعليميا يحتوي الاسئلة التي تريدينها
ثم نتعاون على تنفيذه .....
رد مع اقتباس
  #9  
قديم 08-09-2006, 05:24 PM
shjooon shjooon غير متواجد حالياً
عضو

 
تاريخ التسجيل: Apr 2006
المشاركات: 61
السلام وعليكم ورحمة الله وبركاته

شلونك استاذي الفاضل ومشكور على الايضاح فعلا ربما الملفات الصوتية الي عندي حجمها كبير حاولت ابحث عن صوت اقل حجما بس ياخذ وقت وياريت تبلغوني عن موقع فيه اصوات ذات حجم صغير

اما بالنسبة للأخ فادي فأنا اشكرك على السؤال وكيف هو حالك بس الآن لا يستحضرني شيئ مما طلبت بس لو حبيت اعمل شي ترفيهي كمسابقة حيث اريد اسوي لوحة تتكون من 50 زر ومكتوب عليه رقم وبعض الارقام يوجد اسفلهاسؤال رياضي وكل سؤال يختلف عن الرقم الثاني وحتى في الصياغة اي مو مثل الي شرحه النا الاستاذ خليل هو كان على وتيرة واحدة كل نتيجة قسمة عدد على 10 وتندرج منه قائمة فيه اربع اجابات مختلفة وواحدة منها فقط صحيحة ولا بد من وضع عداد لحساب الوقت اما بعض الارقام مثلا تحوي اسفلها عبارة جرب مرة ثانية أو جائزة فورية فكيف يكون ذلك ؟

أو مثلا لو حبيت عمل لوحة جيوب للمرحلة الابتدائية ومثلا اعطيتهم ارقام وليكن ستة ارقام وطلبت منهم مثلا الترتيب التصاعدي او التنازلي او من هذي الارقام كوني اكبر رقم أو اصغر او شلون يكملون سلاسل الاعداد

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

اخي هذا ما عندي حاليا وانت ايضا شوفنا اطروحاتك الى ان نتفق على عمل شي

ملاحظة : بس لو شفتوني مثلا ما تابعت معاكم اول بأول هذا كله بسبب النيت عندي ضعيف جدا ودائما يقطع لذا لا استطيع الدخول كل مرة ولكن لا يعني انني لست مهتمة بما تفضلتو به ولكم مني جزيل الشكر
رد مع اقتباس
  #10  
قديم 08-09-2006, 08:24 PM
fadi9 fadi9 غير متواجد حالياً
عضو

 
تاريخ التسجيل: Jan 2006
المشاركات: 106
السلام عليكم

الاخت شجون

شكرا لك على الافكار الجميلة التي قدمتيها

حسنا .... لنجرب صنع مشروع ترتيب الاعداد وتكوين اكبر عدد واصغر عدد

في المرفق اعرض المشروع المقترح
وهو غير مكتمل بعد ....

هل عندك افكار لتعديله ..... ام نكمل العمل ؟؟
الملفات المرفقة
نوع الملف: rar مسابقات.rar‏ (2.0 كيلوبايت, المشاهدات 1095)
رد مع اقتباس
  #11  
قديم 08-12-2006, 08:31 AM
shjooon shjooon غير متواجد حالياً
عضو

 
تاريخ التسجيل: Apr 2006
المشاركات: 61
السلام وعليكم ورحمة الله وبركاته

شلونك الأخ فادي

بداية اني اعتذر عن تأخري للرد عليك ولكن هذا خارج عن ارادتي يوجد عندي مشكلة في النيت المهم انا اطلعت على الملف المرفق وعملك ممتاز بس ما فهمت ليش انت مستخدم التكرار ياريت توضحه الي اني اخذت المرفق الخاص بك واستخدمت منه الخطوات الأولى بس اريد من اضغط على زر يخرج الي السؤال وفي نفس الوقت الارقام حتى يتسنى للطالب حله بس ظهرت عندي مشكلة وهي في بعض الاحيان الارقام تتكرر واذا تكررت لا يتمكن الطالب من ترتيب الاعداد تصاعديا او تنازليا فكيف لي التخلص من هذه المشكلة ولكم جزيل الشكر
الملفات المرفقة
نوع الملف: rar مسابقات.rar‏ (2.0 كيلوبايت, المشاهدات 985)
رد مع اقتباس
  #12  
قديم 08-12-2006, 07:17 PM
الصورة الرمزية الاستاذ خليل
الاستاذ خليل الاستاذ خليل غير متواجد حالياً
المدير العام


 
تاريخ التسجيل: Jan 2003
الدولة: مملكة البحرين
المشاركات: 3,977
السلام عليكم

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

الاستاذ خليل
__________________
هذا من فضل ربي
رد مع اقتباس
  #13  
قديم 08-13-2006, 12:06 AM
fadi9 fadi9 غير متواجد حالياً
عضو

 
تاريخ التسجيل: Jan 2006
المشاركات: 106
السلام عليكم

كيف حالك اخت شجون ؟ شكرا لسؤالك عني انا بخير والحمد لله
كيف حالك استاذ خليل ؟

اسف لعدم ارفاق التوضيح سابقا

بالنسبة لسؤالك عن كيفية عدم تكرار الارقام فكما قال الاستاذ خليل يمكن استخدام if
لكن قد يكون الشرط المستخدم طويل جدا بسبب وجود ستة صناديق نص

لذلك اردت ان نستخدم ( المصفوفات ) اي المتريسات matrix كي نطبق عليها حلقات التكرار
فنختصر بذلك الكود

المصفوفات :array
عند نسخ عنصر تحكم LABEL او TEXTBOX او اي عنصر تحكم اخر بدون حذف العنصر الاصلي , عندها سوف يقوم VB بتشكيل مصفوفة من عنصر التحكم هذا بحيث يكون لجميع العناصر نفس الاسم لكنها تختلف بخاصية الفهرس اي INDEX , حيث ياخذ فهرس العنصر الاصلي رقم 0 والعنصر الثاني رقم 1 وهكذا بقية العناصر ....
مثلا اذا نسخنا الليبل المسمى L مرتين فنحصل على العناصر ( L(2) , L(1) , L(0
وهي متماثلة في كل الخصائص ما عدا الخاصية INDEX فهي 0 للاول و1 للثاني و2 للثالث

لنعدل مشروعك : نفرض لدينا صندوق نص واحد لنسميه T وننسخ خمسة منه فنحصل على ستة صناديق نص هي T(0) , T(1) , T(2) ,T(3),T(4), T(5) 6
بعد توليد الارقام فيها نريد ان نختبر عدم تساوي اي رقمين منها فنقارن قيمة كل عنصر مع العناصر التالية
له باستخدام حلقتي تكرار واحدة لـ i وواحدة لـ j ويكون الكود

for i = 0 to 4
for j = i + 1 to 5
اعد تكوين الارقام if t(i) = t( j) then
next j
next i
في المرفق يوجد التطبيق وقد عدلت ايضا زر - كون عدد- حيث يجب ان يتكون العدد من ارقام
وارجو ان يكون الشرح واضح واذا لزم توضيح اضافي انا حاضر
الملفات المرفقة
نوع الملف: rar مسابقات - معدل.rar‏ (2.1 كيلوبايت, المشاهدات 994)
رد مع اقتباس
  #14  
قديم 08-14-2006, 03:26 PM
shjooon shjooon غير متواجد حالياً
عضو

 
تاريخ التسجيل: Apr 2006
المشاركات: 61
السلام وعليكم ورحمة الله وبركاته

الشكر الجزيل الى الاستاذ الفاضل خليل ابراهيم والى الاخ فادي وان شاء الله فادي الابداع يكون حليفك دوما ولكم مني جزيل الشكر
رد مع اقتباس
  #15  
قديم 08-15-2006, 09:16 PM
fadi9 fadi9 غير متواجد حالياً
عضو

 
تاريخ التسجيل: Jan 2006
المشاركات: 106
المشروع الكامل

في المرفق اعرض المشروع كاملا مع امكانية تشغيله بواسطة ملف تنفيذي دون فتح واجهة vb
هل من سؤال او استفسار ؟؟
الملفات المرفقة
نوع الملف: rar مسابقتان 16.rar‏ (8.8 كيلوبايت, المشاهدات 1101)
نوع الملف: rar مسابقات 1.rar‏ (2.5 كيلوبايت, المشاهدات 1039)
رد مع اقتباس
  #16  
قديم 08-15-2006, 10:36 PM
الصورة الرمزية الاستاذ خليل
الاستاذ خليل الاستاذ خليل غير متواجد حالياً
المدير العام


 
تاريخ التسجيل: Jan 2003
الدولة: مملكة البحرين
المشاركات: 3,977
ممتاز عمل رائع لكن يجب عليك استعمال اصوات و تجميل البرنامج و اختبار الاجابات بعد الضغط على الارقام مباشرة لانك لو كان هناك اعادة للارقام في حال الخطا يكون احسن

اهم شي الدزاين للاولاد يجب ان يكون ممتاز ليعجبهم و يتشجعو ليعملوا عليه هذا حسب رايي

لو تعمل مشنقة عندما يضهر خطا يضهر الوجه ثم الجسم ثم تكمل الجسم و هكذا

ايضا يا ريت لو تعمل فورم عن البرنامج تكتب فيها اسمك انه من تنفيذك .
ايضا شرح لطريقة العمل

الاستاذ خليل
__________________
هذا من فضل ربي
رد مع اقتباس
  #17  
قديم 02-05-2007, 02:27 PM
يقين الزهراء يقين الزهراء غير متواجد حالياً
عضو
 
تاريخ التسجيل: Feb 2007
المشاركات: 10
شكرا لك يااستاذ خليل
رد مع اقتباس
  #18  
قديم 02-06-2007, 12:05 PM
يقين الزهراء يقين الزهراء غير متواجد حالياً
عضو
 
تاريخ التسجيل: Feb 2007
المشاركات: 10
لو سمحنم اريد المشاركه معكم في المشروع
رد مع اقتباس
  #19  
قديم 02-06-2007, 09:30 PM
الصورة الرمزية الاستاذ خليل
الاستاذ خليل الاستاذ خليل غير متواجد حالياً
المدير العام


 
تاريخ التسجيل: Jan 2003
الدولة: مملكة البحرين
المشاركات: 3,977
حياكي الله يقين الزهراء اصنعي برنامج و سنساعدك اذا احتجتي لكود انشاء الله برنامج يخدم صفك و اعطيه للمعلمة هكذا ستكون لك درجات لديها ايضا

الاستاذ خليل
__________________
هذا من فضل ربي
رد مع اقتباس
  #20  
قديم 07-30-2007, 10:09 PM
zine pef zine pef غير متواجد حالياً
عضو

 
تاريخ التسجيل: Apr 2007
المشاركات: 148
مسابقات جيد جداً و مع الأسف كنت غائب عنها؟؟؟؟؟؟
رد مع اقتباس
إضافة رد


الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1)
 
أدوات الموضوع
تقييم هذا الموضوع
تقييم هذا الموضوع:

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع


الساعة الآن 05:05 PM

Style provided by: MonksDiner - Entertainment Forum
Translated To Arabic By: Nile Stars
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. TranZ By Almuhajir