在ACCESS查询中使用动态FROM语句的方法如下:
创建一个VBA函数来生成要使用的FROM子句。例如,您可以创建一个名为“GetFromClause”的函数,此函数会接受参数并返回包含FROM子句的字符串。
在创建查询时,将此函数的调用作为FROM子句的值。例如,如果要从名为“Employees”的表中选择数据,则可以使用以下查询:
SELECT * FROM GetFromClause("Employees");
Dim db As DAO.Database Dim rs As DAO.Recordset
Set db = CurrentDb Set rs = db.OpenRecordset("SELECT * FROM GetFromClause('Employees')")
While Not rs.EOF ' Do something with current record rs.MoveNext Wend
Set rs = Nothing Set db = Nothing
请注意,GetFromClause函数必须返回有效的FROM子句字符串。否则,将无法执行查询并报错。