اذهب الي المحتوي
أوفيسنا

المسابقة الثقافية النسخة 3


الردود الموصى بها

ملاحظات على هذه النسخة :

- تم وضع الاسئلة في شيت (ورقة) بدل الفورم ليتم التعديل على الاسئلة و الاجوبة

- يتم التقيد بمكان وضع الاجابات الخاطئة و الاجابات الصحيحة (موضحة بالالوان)

- تم ربط الفورم بالورقة و الورقة بالفورم (التناوب في الظهور)

- تم عمل الملف في ملف تنفيذي مدمج معه ملف رجستري ليتم خفض امان الماكرو (صالح لجميع نسخ الاوفيس)

- تم عمل ايقونة للملف لاضافة مسحة جمالية للملف

في الاخير تقبلوا كل الود و المحبة و الشكر للاخ الحبيب يوسف عطا الذي اشار الى الفكرة

رابط هذا التعليق
شارك

السلام عليكم

الاستاذ الفاضل محمد يحياوي

يسعدني بأن اكون اول الواصلين للرد على هذه الدرة التي وضعتها

بارك الله فيك وسلمت يمينك

ابواحمد

رابط هذا التعليق
شارك

السلام عليكم

الاستاذ الفاضل محمد يحياوي

يسعدني بأن اكون اول الواصلين للرد على هذه الدرة التي وضعتها

بارك الله فيك وسلمت يمينك

ابواحمد

اخى يحياوى

صدق ابواحمد اخى عبدالله درر فعلا

تحياتى

سعد عابد

رابط هذا التعليق
شارك

ezrصدقني عندما قمت بالرد لم احمل الملف لأنني متأكد وكلي يقين من نوع الملف وإتقانه وجودته لأنه من شخص تعودنا دائما على إبداعاته المتواصلة فجزاك الله كل خير

رابط هذا التعليق
شارك

استاذنا / يحياوى

البرنامج اذا غيرت فى الاسئلة يحتاج ان تضغط على الاجابة الصحيحة فقط واذا اخترت الخطأ يغلق البرنامج

اذا عدلت الاسئلة وحاولت ان اعمل نسخة لمادة اخرى لااستطيع لانها مبرمجة

بمعنى لانستطيع تعدد المواد بها

ولكم جزيل الشكر

تم تعديل بواسطه القومي
رابط هذا التعليق
شارك

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

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

على العموم فك الضغط عن الملف التنفيذي و حاول مرة اخرى

رابط هذا التعليق
شارك

أخي الحبيب / يحياوي

عمل رائع بكل المقاييس ، واسمح لي في اقتراح ، لو هناك إمكانية إضافة أسئلة وإجابات جديدة مثلاً من خلال فورم فأرى أن الملف سيصبح أروع وأروع .

تقبل تحياتي وتقديري

أبو عبدالله

رابط هذا التعليق
شارك

أخونا الغالى يحياوى

ما الجزء الذى يجب تغييره فى الكود أو الفورم ليكون عدد الأسئلة مفتوح

مثلاً 100 سؤال بكل مستوى أو أكثر

وهل يمكن إضافة زر بكلمة التالى فى حالة أردنا أن نتحكم فى وقت كل سؤال يدوياً ؟؟

رابط هذا التعليق
شارك

الاخوة الافاضل : ابو عبد الله - يوسف عطا - ابو الليل جزاكم الله خيرا على المرور

بالنسبة لملاحظة الاستاذ ابو عبد الله في محلها فساعمل على ذلك في نسخة اخرى ان شاء الله

بالنسبة لطلب الاخ يوسف عطا الاول بفرض انك تريد اضافة سؤال حيث يصبح عدد الاسئلة 11 في المستوى الاول يصبح الكود


Private Sub Comsoal1_Click()

If trueq + falseq = 11 Then

و كذلك زيادة هذه الاسطر

ElseIf a = 11 Then

q1 = Worksheets("Sheet1").Range("l1")

a1 = Worksheets("Sheet1").Range("l2")

a2 = Worksheets("Sheet1").Range("l3")

a3 = Worksheets("Sheet1").Range("l4")

a4 = Worksheets("Sheet1").Range("l5")

رابط هذا التعليق
شارك

مشكور يا غالى على إجابة السؤال الأول

ماذا بشأن السؤال الثانى ؟؟

إضافة زر لضبط وقت كل سؤال يدوياً يكون مكتوب عليه مثلاً السؤال التالى

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information