Trong hướng dẫn này, bạn sẽ học cách mở và chạy các truy vấn trong VBA.
Chúng tôi đã tạo một bảng có tên ProductsT và một truy vấn chọn đơn giản sẽ chọn danh mục sản phẩm có tên sản phẩm là Product BBB, từ bảng.
Mở truy vấn bằng VBA
Bạn có thể sử dụng phương thức DoCmD.OpenQuery để mở / xem một truy vấn mà bạn đã tạo. Đoạn mã sau sẽ mở truy vấn có tên QueryOne:
DoCmd.OpenQuery "QueryOne"
Kết quả là:
Cú pháp của phương thức DoCmd.OpenQuery là:
DoCmd.OpenQuery (QueryName, Quan điểm, DataMode) ở đâu:
Tham số | Sự miêu tả |
---|---|
QueryName | Tên của truy vấn hiện có trong cơ sở dữ liệu mà bạn muốn mở / xem. |
Quan điểm | Chế độ xem mà bạn muốn mở truy vấn. Đây có thể là acViewDesign, acViewLayout, acViewNormal, acViewPivotChart, acViewPivotTable, acViewPreview hoặc acViewReport. Mặc định là acViewNormal. (Không bắt buộc) |
DataMode | Chế độ nhập dữ liệu mà bạn muốn mở truy vấn của mình. Chế độ này có thể là acAdd, acEdit hoặc acReadOnly. Mặc định là acEdit. (Không bắt buộc) |
Chạy Truy vấn Hành động với VBA
Bạn có thể sử dụng phương thức DoCmd.RunSQL để chạy các truy vấn hành động như truy vấn cập nhật, truy vấn nối thêm, truy vấn xóa và thực hiện truy vấn bảng. Đoạn mã sau gắn một bản ghi vào bảng:
DoCmd.RunSQL "Chèn INTO ProductsT ([ProductID], [ProductName], [ProductCategory], [ProductPricePerUnit]) VALUES (6, 'Product FFF', 'Toys', 10);"
Cú pháp của phương thức DoCmd.RunSQL là:
DoCmd.RunSQL SQLStatement trong đó:
SQLStatement - bắt buộc và là một câu lệnh SQL cập nhật bản ghi, nối bản ghi, xóa bản ghi hoặc tạo một bảng mới.
Ghi chú: DoCmd.RunSQL chỉ hoạt động với một số câu lệnh SQL nhất định.