الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

الرجاء المساعدة في خبراء فجوال بيسك

بدأه miss_rjjh في 14 يناير 2010 · 2 رد · 473 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

أرجو منكم مساعدتي

فكرة مشروعي ( أسئلة مسابقة من القران الكريم )

ولا أعلم أين الخطا في الكود لكن لا أستطيع تشغيل البرنامج

الرجاء المساعدة وكيف يمكنني احتساب المجموع ؟

وشكررا

project.rar

#2

الخطأ في انه يجب وضع الكود "Sum=0" تحت حدث معين مثل حدث الـ Form_Load وهو يعني انهعند تحميل الفورم يساوي قيمة المتغير Sum بالصفر

Private Sub Form_Load()
sum = 0
End Sub

وعند التصريح عن المتغير Sum في Form1 اذا فهو خاص بهذا الفورم فقط ولا يمكن استخادمه في فورم اخر

ولأستخدامه في باقي الصفحات يجب التعريف عنه داخل قصم التصريحات Module وليس في الفورم , ولإضافة Module جديد نفس طريقة إضافة فورم جديد لكن بدل اختيار Form نختار Module من القائمة

ثم نكتب كود التصريح عن المتغير ولكن نستبدل Dim بـ Public ليكون متغير عام لإستخدامه في اي صفحة من صفحات المشروع

Public sum As Single

وفي المثال ما تم توضيحه ,,,,,

ولكن لي ملاحظة , هناك طريقة افضل يمكن اتباعها في مثل هذا البرنامج وهي كالاتي :

تصميم فورم واحد لعرض كل الاسئلة والاختيارات الخاصة بها وتصميم قاعدة بيانات صغيرة يتم وضع فيها كل الاسئلة وكل سؤال بالاختيارات الخاصة به ورقم الاختيار الصحيح

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

وبالتوفيق ,,,,,

project2.rar

It does not matter what they know about you, but what you can do, so let your work speak of you

mmghv VB6 Programmer

#3

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

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…