DCount trong VBA Access

Hướng dẫn DCount trong VBA Access khi làm phần mềm thực tế

  1. Định nghĩa hàm DCount trong VBA Access
  2. Ví dụ đếm toàn bộ bản ghi trong bảng
  3. Ví dụ đếm bản ghi theo điều kiện
  4. Ví dụ sử dụng biến trong điều kiện
  5. Một số lưu ý khi dùng DCount

1. Định nghĩa hàm DCount trong VBA Access

Hàm DCount dùng để đếm số bản ghi trong một bảng (Table) hoặc Query theo một điều kiện nào đó. Hàm này thường được sử dụng khi cần biết có bao nhiêu dòng dữ liệu thỏa mãn một điều kiện.

Cú pháp:

 DCount ( expr , domain , [criteria] ) 
Trong đó:

Tham số Ý nghĩa
expr Tên trường cần đếm, có thể dùng "*" để đếm toàn bộ bản ghi
domain Tên bảng hoặc Query chứa dữ liệu
criteria Điều kiện lọc dữ liệu (không bắt buộc)

2. Ví dụ đếm toàn bộ bản ghi trong bảng

Trong ví dụ dưới đây, hàm DCount sẽ đếm toàn bộ số dòng trong bảng tbKhachHang.

 Dim sl As Long sl = DCount("*", "tbKhachHang")  MsgBox sl 

Giải thích:

Thành phần Ý nghĩa
* Đếm tất cả các bản ghi
tbKhachHang Tên bảng chứa dữ liệu

3. Ví dụ đếm bản ghi theo điều kiện

Ta có thể dùng criteria để chỉ đếm những bản ghi thỏa điều kiện. Ví dụ: đếm số khách hàng ở Hà Nội.

 Dim sl As Long
sl = DCount("*", "tbKhachHang", "ThanhPho='Ha Noi'")
MsgBox sl

Trong ví dụ này:

Thành phần Ý nghĩa
ThanhPho='Ha Noi' Chỉ đếm những bản ghi có thành phố là Hà Nội

4. Ví dụ sử dụng biến trong điều kiện

Trong thực tế, điều kiện thường lấy từ biến hoặc giá trị nhập vào.

 Dim ma As Long
Dim sl As Long ma = 5
sl = DCount("*", "tbKhachHang", "MaKhachHang=" & ma)
MsgBox sl

Giải thích:     MaKhachHang=" & ma sẽ ghép giá trị của biến vào điều kiện tìm kiếm.

5. Một số lưu ý khi dùng DCount

Kiểu dữ liệu Cách viết điều kiện
Số MaKhachHang=5
Chuỗi TenKH='Nguyen Van A'
Ngày Ngay=#2026-03-13#

Khi sử dụng DCount, cần chú ý đúng kiểu dữ liệu trong điều kiện để tránh lỗi khi chạy chương trình.

Tìm kiếm:

Bài viết liên quan:

Hướng dẫn DCount trong VBA Access khi làm phần mềm thực tế