Sample
File & Video Download: Checkbox_Optionbutton_Program Zip File (44 KB)
Video
Link: Checkbox_Optionbutton_Program
*** নিচের কোন লাইন না বুঝতে পারলে ভিডিওটা ভাল করে দেখবেন।
(1) প্রথমে
একটি নতুন অ্যাকসেস ফাইলে একটি নতুন Form নেই।
(2) ফরমে
তিনটি টেক্সট বক্স, একটি Option Group এবং তাতে তিনটি Option button ও তিনটি
Checkbox নেই। টেক্সট বক্স তিনটির নাম দেই যথাক্রমে txtRed, txtGreen, txtBlue. Checkbox
গুলোর নাম দে্ই যথাক্রমে chkRed, chkGreen, chkBlue.
(3) এখন
Option Group এর Click Event এ নিচের কোডসমূহ লিখি।
Private Sub FrameColor_Click()
If Me.FrameColor.Value = 1 Then
Me.Detail.BackColor = vbCyan
ElseIf Me.FrameColor.Value = 2 Then
Me.Detail.BackColor = vbMagenta
ElseIf Me.FrameColor.Value = 3 Then
Me.Detail.BackColor = vbYellow
End If
End Sub
(4) Checkbox
সমূহে যথাক্রমে নিচের কোডগুলো লিখি।
Private Sub chkBlue_Click()
If Me.chkBlue.Value = True Then
Me.txtBlue.BackColor = vbBlue
Else
Me.txtBlue.BackColor = vbWhite
End If
End Sub
Private Sub chkGreen_Click()
If Me.chkGreen.Value = True Then
Me.txtGreen.BackColor = vbGreen
Else
Me.txtGreen.BackColor = vbWhite
End If
End Sub
Private Sub chkRed_Click()
If Me.chkRed.Value = True Then
Me.txtRed.BackColor = vbRed
Else
Me.txtRed.BackColor = vbWhite
End If
End Sub
ফরমটি রান
করিয়ে Option button ও Checkbox সমূহ সেলেক্ট করে program গুলো টেস্ট করি।
কোন জিজ্ঞাসা
থাকলে কমেন্টে জানাবেন।
0 comments:
Post a Comment