درس الأزرة
قم بإنشاء ما يلي
" ملاحظة هامة : هناك خطوات كثيرة تم اختصارها ، فإذا حدث لبس عليك فعد إلى
الدروس الست السابقة "
لقد تم شرح الخطوات لتصميم الشكل بمجمله في الدروس السابقة في قسم الفيجول
بيسك فعد لها
|
ثم أضف الكود
داخل زر الأوامر " نفذ المطلوب "
If
Option1.Value = True Then
Text1 = "المصمم"
End If
If Option2.Value = True Then
Text1 = "سحاب"
End If
If Option3.Value = True Then
Text1 = "إن التي زعمت فؤادك ملها ... "
End If
|
ماذا تعني الأسطر
الماضية ؟
الأداة الشرطية IF سبق شرحها .
Option1,2,3 اسماء الأزرة و يمكن تغييرها .
Value تحديد خاصية الزر .
True السماح للزر بالعمل في حالة True .
Then سبق شرحها .
تستفاد الأزرار في عملية جعل المستخدم يختار شيء واحد فقط