تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طريق استخدام المصفوفات
#1
السلام عليكم ممكن حل السؤال ضروري جدا جدا 
 كتب المقطع (الكتلة) البرمجي بلغة VB6التي تعلن عن مصفوفة ب اسم DAYS ARRAY من النوع VARIANT غير محدد الحجم ثم اسند لها ايام الاسبوع مثل"SUN" باستخدام الدالة array بعد تعيين حجم لها اضف الى المصفوفه 10 ارقام عشوائية تقع بين 1-100 و من ثم طباعة عناصر المصفةفة على النموذج
الرد }}}
تم الشكر بواسطة:
#2
أهلا أختي الكريمه , هذا الكود ضعيه في داخل كود زر :

PHP كود :
Dim Days_Array() As Variant
Dim I 
As Integer

Days_Array 
= Array("Sunday""Monday""Tuesday""Wednesday""Thursday""Friday""Saturday")

ReDim Preserve Days_Array(16) As Variant

For 7 To 16
    Randomize
    Days_Array
(I) = Int((100 Rnd) + 1)
Next

For 0 To 16
    
Print Days_Array(I)
Next 
الرد }}}


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استخدام keyup event لعرض نموذج haitham Muhammed 1 78 10-03-24, 07:43 PM
آخر رد: haitham Muhammed
  اضافة سجل جديد عن طريق الDataGrid اسلام الكبابى 2 951 05-07-23, 01:15 PM
آخر رد: محمد ابو ايمن
  عدد مرات استخدام البرنامج اسلام الكبابى 4 682 22-06-23, 10:02 PM
آخر رد: اسلام الكبابى
  ارسال sms عن طريق الفجوال بيزيك 6 2003amin 2 655 05-12-22, 08:14 AM
آخر رد: Ergheegh2022
  ممكن البرنامج يبعت رسايل للموبايل عن طريق النت رجل الكهرباء 5 1,568 12-05-22, 12:52 PM
آخر رد: الاصيله
Question [vb6.0] هل يمكن نسخ ما في Text عن طريق زر الامر ؟؟ Microformt 2 1,119 02-10-21, 02:39 PM
آخر رد: Microformt
  احناج مثال لكيفية استيراد بيانات من ملف اكسيل الى قاعدة البيانات عن طريق الفيجوال amro1965 0 1,454 19-01-21, 06:22 PM
آخر رد: amro1965
Question [vb6.0] كيف يمكن فتح قائمة التاريخ عن طريق زر الامر ؟؟ Microformt 2 1,409 15-07-20, 04:59 AM
آخر رد: Ahmed_Mansoor
  سؤال حول كيفية تصغيرحجم الخط ليناسب حجم التكست بوكس عن طريق الكود haider kh 6 2,482 04-07-20, 05:00 PM
آخر رد: haider kh
  هل يمكن استخدام برنامج يعمل بالباركود في تنزيل درجات امتحانات؟ gonm64 11 3,361 03-06-20, 05:16 AM
آخر رد: gonm64

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


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم