Một số lệnh VBA tương tác với Control Form MS Access

1. Định nghĩa về Form Controls trong VBA Access
2. Cách lấy dữ liệu từ TextBox
3. Cách gán dữ liệu cho Control
4. Sử dụng Button trong Form
5. Một số thuộc tính quan trọng của Control
6. Duyệt toàn bộ Controls trên Form
7. Làm mới dữ liệu trên Form

1. Định nghĩa về Form Controls trong VBA Access

Form Controls là các điều khiển xuất hiện trên Form như: TextBox, ComboBox, Button, ListBox... Các control giúp người dùng:
- Nhập dữ liệu
- Hiển thị dữ liệu
- Thực hiện thao tác xử lý

Dim ten As String

ten = Me.txtHoTen

MsgBox ten 

Me.txtDiaChi = "Hồ Chí Minh" 

2. Cách lấy dữ liệu từ TextBox

Có thể lấy dữ liệu từ control bằng: Me.TenControl Ví dụ textbox tên: txtHoTen

Dim hoTen As String

hoTen = Me.txtHoTen

MsgBox hoTen 

Ví dụ lấy dữ liệu và kiểm tra rỗng:

 If Nz(Me.txtHoTen, "") = "" Then

  MsgBox "Chưa nhập họ tên" 

End If 

3. Cách gán dữ liệu cho Control

Có thể gán dữ liệu trực tiếp cho: TextBox, ComboBox, Label

 Me.txtHoTen = "Nguyễn Văn A" 

 Me.cboLop = "Python" 

4. Sử dụng Button trong Form

Button thường dùng để:

- Lưu dữ liệu
- Xóa dữ liệu
- Mở Form khác Ví dụ tạo sự kiện click cho nút lệnh:

 Private Sub btnLuu_Click() 

 MsgBox "Đã lưu dữ liệu"  End Sub 

Ví dụ mở Form khác:

 Private Sub btnMoForm_Click() 

  DoCmd.OpenForm "frmHocSinh"

End Sub 

5. Một số thuộc tính quan trọng của Control

Ví dụ ẩn TextBox:

 Me.txtHoTen.Visible = False 

Ví dụ đổi màu nền:

 Me.txtHoTen.BackColor = vbYellow 

6. Duyệt toàn bộ Controls trên Form

Có thể dùng vòng lặp để lấy toàn bộ controls.

Dim ctl As Control

For Each ctl In Me.Controls

  Debug.Print ctl.Name

Next 

Ví dụ chỉ lấy các TextBox:

 Dim ctl As Control

For Each ctl In Me.Controls

If ctl.ControlType = acTextBox Then          

  Debug.Print ctl.Name

End If  Next 

7. Làm mới dữ liệu trên Form

Dùng: Requery để cập nhật dữ liệu mới.

 Me.Requery 

Ví dụ làm mới ComboBox:

 Me.cboLop.Requery 

Tìm kiếm: