Làm cách nào để thực thi truy vấn trong truy cập ms trong mã VBA?

Question

Làm cách nào để thực hiện truy vấn trả về các bản ghi trong cơ sở dữ liệu truy cập ms bằng mã VBA?

Answer 1

Hãy xem hướng dẫn này về cách sử dụng SQL bên trong VBA:

http://www.ehow.com/how_7148832_access-vba-query-results.html

Đối với một truy vấn mà sẽ không trả lại kết quả, sử dụng (reference here):

DoCmd.RunSQL 

Đối một trong đó sẽ sử dụng (reference here):

Dim dBase As Database 
dBase.OpenRecordset 

Answer 2

H ow về một cái gì đó như thế này ...

Dim rs As RecordSet 
Set rs = Currentdb.OpenRecordSet("SELECT PictureLocation, ID FROM MyAccessTable;") 

Do While Not rs.EOF 
    Debug.Print rs("PictureLocation") & " - " & rs("ID") 
    rs.MoveNext 
Loop