لبيك يا الله
  • الرئيسيةالرئيسية  
  • أحدث الصورأحدث الصور  
  • التسجيلالتسجيل  
  • دخولدخول  



    • حديث قدسىعن رب العزة جلا وعلاعن أبي هريرة ـ رضي الله عنه قال: قال رسول الله صلى الله عليه وسلم: “إن الله إذا أحب عبداً دعا له جبريل، عليه السلام، فقال: إني أحب فلانا فأحبه، قال: فيحبه جبريل، ثم ينادي في السماء فيقول: إن الله يحب فلانا فأحبوه، فيحبه أهل السماء، قال: ثم يوضع له القبول في الأرض، وإذا أبغض الله عبداً، دعا جبريل، فيقول: إني أبغض فلانا فأبغضه، فيبغضه جبريل، ثم ينادي في أهل السماء: إن الله يبغض فلاناً، فأبغضوه، قال: فيبغضونه، ثم توضع له البغضاء في الأرض”.
    فى رياض القراءن الكريممقتظفات اسلاميهمقلات فى اركان الاسلامفى رحاب الاحاديثفتاوى اسلاميهفى رحاب العقيدة الاسلاميه االفقه المباركالطب النبوى
    المواضيع الأخيرة
    كل عام وانتم بخيرالجمعة 23 أبريل - 16:08رضا السويسى
    كل عام وانتم بخيرالخميس 7 مايو - 22:46رضا السويسى
    26 فائدة مرتبة من فتوى شيخِ الإسلام متعلقة بالأحرفِ والقراءاتالجمعة 21 سبتمبر - 15:16مسلم
    المسح على رأس اليتيم و العلاج باللمسالأربعاء 22 أغسطس - 14:45البرنس
    (16) ما أجمل الغنائمالجمعة 11 أغسطس - 18:51رضا السويسى
    مطوية ( رَبَّنَا لَا تُزِغْ قُلُوبَنَا بَعْدَ إِذْ هَدَيْتَنَا)الإثنين 10 أغسطس - 18:34عزمي ابراهيم عزيز
    مطوية ( وَخَابَ كُلُّ جَبَّارٍ عَنِيدٍ)الأحد 9 أغسطس - 19:02عزمي ابراهيم عزيز
    مطوية ( وَآتُوا الْيَتَامَى أَمْوَالَهُمْ)السبت 8 أغسطس - 12:46عزمي ابراهيم عزيز
    مطوية ( إِنَّنِي مِنَ الْمُسْلِمِينَ )الأربعاء 5 أغسطس - 18:34عزمي ابراهيم عزيز



    المصفوفات والمتغيرات(2)

    لبيك يا الله :: مكتبه برامج الكمبيوتر والانتر نت :: الجرافيت والفلاشات وتصميم المواقع
    اذهب الى الأسفل
    عبد الرحمن
    عبد الرحمن
    لبيك يا الله
    الرسائل
    النقاط
    البلد

    المصفوفات والمتغيرات(2) Empty المصفوفات والمتغيرات(2) {الجمعة 28 أكتوبر - 21:36}

    المصفوفات
    والمتغيرات(2)







    يجب ان تشمل المصفوفة على:



    أ‌- اسم المصفوفة: الاسم الذي ستستعمله للمصفوفة في
    البرنامج



    ب‌- نوع البيانات : يحدد نوع البيانات التي ستخزنها
    المصفوفة



    ج- عدد الأبعاد : لمعظم المصفوفات بعد واحد (قائمة
    قيم) أو بعدين (جدول قيم)



    د- عدد العناصر : يحدد عدد عناصر المصفوفة وبشكل
    افتراضي تكون أول خانة في المصفوفة برقم فهرس 0 (صفر) كما هو الحال مع مصفوفات
    التحكم



    تسمى المصفوفات التي تحتوي على عدد عناصر محدد بمصفوفات ثابتة الحجم Fixed Size أما
    المصفوفات التي تحتوي على عدد عناصر متغير فهي مصفوفات يمكن توسيعها خلال تشغيل
    البرنامج ويطلق عليها اسم Dynamic مصفوفات ديناميكية تصريح مصفوفة ثابتة

    التركيب النحوي الأساسي لتصريح مصفوفة ثابتة الحجم عامة هو (Public Arry Name(Dim
    iliements,Dim2 Elemets,... تغيير رقم البداية في المصفوفة

    تغير جملة Option Base رقم أول عنصر في المصفوفة بجعله
    أي رقم بدلا من الرقم صفر الافتراضي فإذا أردت زيادة الوضوح في البرنامج بجعل رقم
    أول عنصر في المصفوفة هو العنصر رقم 1 بدلا من رقم 0 يمكنك وضع جملة Option Base
    التالية في وحدة نمطية قياسية Option Base 1 تربط هذه الجملة العنصر الأول (الأساس
    Base ) لكل المصفوفات في البرنامج بالرقم 1 مثال استخدام المصفوفات





    بعد تجهيزك للفورم أضف إليه زرين أمر Command Button



    غير خاصية Caption لكل من الأزرار كما يلي:



    Command1 = إدخال



    Command2 = إظهار النتيجة



    ولا تنسى تغيير خاصية الإتجاه للفورم Right To Left







    وأضف وحدة نمطية Module



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








    Option Base 1

    Public Degs(9) As
    Variant
    أضف الكود التالي إلى زر تخزين القيم







    cls: prompt$ = 'إدخال قيمة'


    For i% = 1 To 3


    Title$ = 'القيمة' & i%

    Degs(i%) = InputBox(prompt$, Title$)

    Next i%
    تمحو جملة Cls في أعلى الأجراء الحدثي إخراج
    الجمل Print السابقة على النموذج ليصبح بإمكانك إدخال اكثر من مجموعة قيم







    ثم أضف الكود التالي إلى الزر الثاني







    cls: Print
    'القيم': Print '-----------'

    For i% = 1 To 3


    Print 'المادة' & i% &
    'قيمة' & Degs(i%): Print '-----------'



    total! = total! + Degs(i%): Next i%

    Print 'مجموع القيم' &
    total!
    تم إنهاء درس المصفوفات والمتغيرات



    وبالتوفيق للجميع
    الرجوع الى أعلى الصفحة
    صلاحيات هذا المنتدى:
    لاتستطيع الرد على المواضيع في هذا المنتدى