Checkbox và option button

[vuthuanbkvn]

Mình đã được bạn Phát cho vi dụ cụ thể về option button ,ví dụ rất cụ thể dễ dàng làm. Còn với nút checkbox mình ko thể nào tìm được để học hỏi. Bạn nào có thể chỉ giáo được không? Ví dụ cụ thể nha. Mình mới giai đoạn học hỏi thôi,chỉ vắn tắt e chừng lại hỏi lại. hehehe
Giả dụ mình có 1 form tìm kiếm.
không phải sử dụng option nữa mà dùng nút check để lựa chọn nhung thứ mình muốn tìm.
1 textbox : txttoaxe
1 combox :cbotinhtrangbaoduong
1 textbox : txtsolanbaoduong

Dùng checkbox để khi nào nhấp vào lựa chọn thì textbox hay combox đó sẽ sáng lên để mình lọc những thứ cần thiết,có thể lựa chọn 2 điều kiện hay cả 3 điều kiện cùng 1 luc.
Chân thành cảm ơn.

Các bài viết khác cùng chuyên mục:

• Chọn 1 record trong listbox để insert vào...
• Trợ giúp cách trừ lùi trong Access
• xuất table access sang nhiều sheet excell
• Print data từ Access vào form Word
• Giúp mình tạo Form truyền dữ liệu từ Table...
• Lỗi access 2003 khi chạy trên 2007
• Chạy 1 function vbscript trong Access???
• Các Bro giúp em sử lý hàm Dsum kết hợp hàm...
• giúp e 1 bài VBA này cái
• hướng dẫn cách tạo autorun cho powerpoint

[phatnq2002]

Giả sử:
checkbox1 link với txttoaxe
checkbox2 link với cbotinhtrangbaoduong
checkbox3 link với txtsolanbaoduong

Các checkbox khởi đầu bạn cho Default Value = No
txttoaxe, cbotinhtrangbaoduong, txtsolanbaoduong cho Enabled = No

Vào sự kiện After_Update của mỗi check box, nhập vào (ví dụ cho checkbox1):

txttoaxe.Enabled = checkbox1

Tương tự cho hai checkbox kia.

[vuthuanbkvn]

Giả sử:
checkbox1 link với txttoaxe
checkbox2 link với cbotinhtrangbaoduong
checkbox3 link với txtsolanbaoduong

Các checkbox khởi đầu bạn cho Default Value = No
txttoaxe, cbotinhtrangbaoduong, txtsolanbaoduong cho Enabled = No

Vào sự kiện After_Update của mỗi check box, nhập vào (ví dụ cho checkbox1):

txttoaxe.Enabled = checkbox1

Tương tự cho hai checkbox kia.

Còn nếu muốn thực hiện lệnh tìm kiêm thì theo câu lệnh thế nào nhỉ?
Như này được không?
If Checkbox1.Value = True Then
MsgBox "AAAA"
ElseIf checkbox2.Value = True Then
MsgBox "BBBB"
ElseIf Checkbox3.Value = True Then
MsgBox "CCCC"
Else
MsgBox "Chua cli.k vao option button"
End If
Hay vẫn dùng CASE 1...... ?... làm tương tự như ví dụ bạn hướng dẫn đc ko? tìm trong table ấy?