22-01-14, 04:00 PM
الصفحات : 1 2
22-01-14, 05:28 PM
السلام عليكم
- عند الضغط على الزر الموجود على الفورم قبل ماتشغل البرنامج ضغطتين سريعه لكي يظهر لك صفحة الكود مباشرةً ستكون داخل حدث الClick للزر وستجد أنه تم إضافة معامل جديد للحدث وهو Index لأن الأزرار التي ستنشأ عند تشغيل البرنامج ستكون عبارة عن مصفوفة أزرار بإسم واحد وهو Command1 ولا تقدر تميز بينها إلا برقم الزر ورقم الزر سيكون في المعامل الجديد الIndex يعني سيكون حدث الClick واحد لكل الأزرار وأيضاً جميع الأحداث الأخرى ستكون موحده ، لذلك إذا أردت عرض عنوان الزر عند الضغط على أحد الأزرار تكتب الكود في حدث ال Click بهذا الشكل :
- تحياتي .
- عند الضغط على الزر الموجود على الفورم قبل ماتشغل البرنامج ضغطتين سريعه لكي يظهر لك صفحة الكود مباشرةً ستكون داخل حدث الClick للزر وستجد أنه تم إضافة معامل جديد للحدث وهو Index لأن الأزرار التي ستنشأ عند تشغيل البرنامج ستكون عبارة عن مصفوفة أزرار بإسم واحد وهو Command1 ولا تقدر تميز بينها إلا برقم الزر ورقم الزر سيكون في المعامل الجديد الIndex يعني سيكون حدث الClick واحد لكل الأزرار وأيضاً جميع الأحداث الأخرى ستكون موحده ، لذلك إذا أردت عرض عنوان الزر عند الضغط على أحد الأزرار تكتب الكود في حدث ال Click بهذا الشكل :
كود :
Private Sub Command1_Click(Index As Integer)
Text1.Text = Command1(Index).Caption
End Sub- تحياتي .
22-01-14, 06:04 PM
الله يعطيك العافية اخوي
شكرا شكرا شكرا
مع فائق احترامي وتقديري
شكرا شكرا شكرا
مع فائق احترامي وتقديري
الصفحات : 1 2