Advanced Search

المحرر موضوع: لااعرف الشيفره؟؟  (زيارة 1010 مرات)

0 الأعضاء و 1 ضيف يشاهدون هذا الموضوع.

نوفمبر 13, 2007, 07:28:32 صباحاً
زيارة 1010 مرات

دموع على الشهيد

  • عضو خبير

  • *****

  • 1108
    مشاركة

    • مشاهدة الملف الشخصي
لااعرف الشيفره؟؟
« في: نوفمبر 13, 2007, 07:28:32 صباحاً »
السلام عليكم ورحمة الله وبركاته

في مادة البرمجه الشيئيه

نتعامل مع الفيجوال بيسك 2005

وفائدته انه لأنشاء برامج

من ضمن البرامج التي انشأت هم البرنامج الثاني الذي قمنا بأنشائه وهو(lucky7)

وهو عباره عن لعبه يتم تغير الأرقام فيها حتى تحصل على رقم 7 في احد الخانات وتظهر لك

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

وقد احببت ان اقوم ببرنامج مماثل له ولكن سميته(lucky m)

احببت ان يكون بالحروف وليس بالأرقام

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

لم اعرف كيف اجعل الخانات بالحروف بالأرقام كانت عباره عن معادله رياضيه

لكن في الحروف كيف ؟؟؟؟

لم اعلم ظللت احاول واجرب اي طريقه لم اعرف

اعرف ان الذي احتاجه شيفره عندما اضغط على زر التدوير يجب ان تدور بمثابة 26 مره لكن تظهر لي حرف عشوائي

انشات المشروع كامل بالشيفره المطلوبه لكن توقفت على مذكرت لكم

اتمنى ان تساعدوني في معرفه هذه الشيفره

لاأني لااحب الأعمال الناقصه

مع العلم ان شيفرة البرنامج الأول كانت بهذه الطريقه :

((label1.text=cstr(int(rnd()*10

وعلى نفس الشيفره اجريت الخانات الباقيه فقط في تغير رقمlabel

اتمنى ان استطيع معرفه الشيفره للحروف بحق

فقد احسست بأزعاج كبير وانا اغلق البرنامج دون تتمته





تحياتي:
دموع على الشهيد
كـــل عــــــام والأشـــــواك بــــــخـــــيـــر


نوفمبر 18, 2007, 09:46:29 مساءاً
رد #1

bioComputer

  • عضو متقدم

  • ****

  • 746
    مشاركة

  • عضو مجلس الحاسب

    • مشاهدة الملف الشخصي
    • www.c4arab.com
لااعرف الشيفره؟؟
« رد #1 في: نوفمبر 18, 2007, 09:46:29 مساءاً »
الحل فى عمل مواصفة ARRAY
اى تجعلى متغير مثل xword كمواصفى تحتوى على 26 عنصر كل عنصر بحرف ..
ثم تستبدلى كل رقم ناتج عن الدالة التى وضعتيها
QUOTE

label1.text=cstr(int(rnd()*10

بالحرف المقابل للرقم


DIM xword(26) as array
word (1:a,2:b:3:c....)

وهكذا حتى تكتمل بقية الحروف
وبعذ ذلك قومى بتعديل الدالى كتابتيها كالاتى

(label1.text=xword(cstr(int(rnd()*10

نوفمبر 19, 2007, 01:04:31 صباحاً
رد #2

دموع على الشهيد

  • عضو خبير

  • *****

  • 1108
    مشاركة

    • مشاهدة الملف الشخصي
لااعرف الشيفره؟؟
« رد #2 في: نوفمبر 19, 2007, 01:04:31 صباحاً »
السلام عليكم ورحمة الله وبركاته

شكرا شكرا شكرا جزيلا اخي على الرد

لقد فهمت ماتقصد ولكن بعض الشي

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

لكن ماتمناه منك ان تشرح لي اياها بالتفصيل

وخاصه اني مبتدئه في مجال دراسة الشيفرات ':blush:'

جزاك الله الف خير اخي على الأجابه




تحياتي:
دموع على الشهيد
كـــل عــــــام والأشـــــواك بــــــخـــــيـــر