هذه الاداه سهلة و مهمة في نفس الوقت, و في هذا المثال سأشرح كيفية استخدامها..
• الفكرة: سنضع CheckBox و Image و عند الضغط علي CheckBox تتغير قيمته و تظهر الصورة حسب القيمة..
• اكتب هذا الكود في CheckBox:
Private Sub Check1_Click()
If Check1.Value = 1 Then
Image1.Visible = True
End If
End Sub
• بالنسبة الي رقم واحد بجانب Check1.Value فهو قيمة الصندوق و تكون كالتالي:0 Unchecked
1 Checked
2 Grayed