在VBA中如何使用SELECT

石头记　发表于：2008-08-16 15:29:13 　

在查询生成器生成的代码：SELECT a1.NAME, a1.sex, a2.age FROM a1 INNER JOIN a2 ON a1.NAME = a2.NAME WHERE (((a1.sex)=[forms]![form]![text0])); 请问以上的代码在Private Sub Command3_Click()中应该如何写入！？！？

Top

小ビビ2UのB8 发表于：2008-08-16 18:25:38

试试这个看看:

DoCmd.RunSQL "SELECT a1.NAME, a1.sex, a2.age FROM a1 INNER JOIN a2 ON a1.NAME = a2.NAME WHERE (((a1.sex)=[forms]![form]![text0]))"

Top

钱玉炜发表于：2008-08-17 08:37:53

楼上的方法比较适合用于删除查询,更新查询,追加查询等

如果要用选择查询,还是用ADO打开记录集,如下

dim rst as new adodb.recordset

dim strsql as string

strsql="SELECT a1.NAME, a1.sex, a2.age FROM a1 INNER JOIN a2 ON a1.NAME = a2.NAME WHERE a1.sex=[forms]![form]![text0]"

rst.open strsql,currentproject.connection,1,3

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

在VBA中如何使用SELECT