Điều khiển CheckBox (Hộp kiểm tra) được sử dụng để yêu cầu người sử dụng lựa chọn một hoặc nhiều lựa chọn (Cũng có thể là 0 có lựa chọn nào). Thuộc tính Value sẽ cho biết là check box có được chọn hay là không.
Thực hành: Đặt kiểu chữ cho hộp văn bản (Đậm, nghiêng, gạch chân) khi người dùng click vào các lựa chọn tương ứng, sau đó click nút "Đặt kiểu chữ".
Hướng dẫn: Vì kiểu chữ của văn bản có thể là Đậm, Nghiêng và gạch chân đồng thời, do vậy ta không thể đưa ra cho người dùng lựa chọn theo kiểu Radio option, mà ở đây phải đưa điều khiển Checkbox vào để người dùng có thể thực hiện nhiều lựa chọn.
Thiết kế giao diện:
Đặt các thuộc tính
| Điều khiển | Thuộc tính : Giá trị |
| Label | + Name: lblThongBao+ Caption: Gõ văn bản vào ô textbox ở dưới |
| TextBox | + Name: txtThongBao+ MultiLine: True+ Scrolls : Both+ Text: để trống |
| CheckBox | + Name: chkBold+ Value: 0 – Unchecked |
| CheckBox | + Name: chkItalic+ Value: 0 – Unchecked |
| CheckBox | + Name: chkUnderline+ Value: 0 – Unchecked |
| Command button | + Name: cmdDatKieuChu+ Caption: Đặt kiểu chữ |
Viết lệnh:
Option Explicit
'/// Thủ tục này xuất hiện khi người dùng click chọn hộp kiểm tra "Chữ đậm"
Private Sub chkBold_Click()
Me.Caption = "Hộp kiểm tra ""Đậm"" đã được chọn"
End Sub
Private Sub chkItalic_Click()
MsgBox "Hộp kiểm tra ""Nghiêng"" đã được chọn"
End Sub
Private Sub chkUnderline_Click()
MsgBox "Hộp kiểm tra ""Gạch chân"" đã được chọn"
End Sub
Private Sub cmdDatKieuChu_Click()
'/// Kiểm tra nếu người dùng chọn hộp kiểm tra nào thì đặt kiểu font tương ứng
If chkBold.Value = 1 Then'/// Người dùng đã chọn hộp "Chữ đậm"
txtThongBao.Font.Bold = True
Else '/// Người dùng đã không chọn hộp "Chữ đậm"
txtThongBao.Font.Bold = False '/// Đặt lại thành chữ thường (Không đậm)
End If
If chkItalic.Value = 1 Then
txtThongBao.Font.Italic = True
Else
txtThongBao.Font.Italic = False
End If
If chkUnderline.Value = 1 Then
txtThongBao.Font.Underline = True
Else
txtThongBao.Font.Underline = False
End If
End Sub
Ghi chú:
- Ngoài 2 giá trị thường dùng của thuộc tính Value là 1-Checked và 0-UnChecked, còn một giá trị thứ 3 dùng trong một số trường hợp là 2-Grayed để ám chỉ rằng bên trong nó có nhiều lựa chọn con khác và một số đã được chọn và một số thì không.
- Có thể viết lệnh ngay ở bên trong sự kiện click chuột của CheckBox.
- Thuộc tính Visible và Enable của CheckBox cũng được dùng để ẩn/hiện và cấm/cho phép tương tác với checkbox.
- Đối tượng con Font của điều khiển TextBox dùng để thay đổi kiểu chữ và kiểu font của hộp văn bản.