请教：如何把查询表的sql写成窗体中的vba语句？

wyh99999　发表于：2010-01-29 20:50:20 　

请教：（如题）

SELECT js_zjpp.js_sfzh AS 身份证号码, Last(js_zjpp.jx_nd) AS 资格类别, Last(js_zjpp.js_jszc) AS 现任职称, Last(js_zjpp.js_pp) AS [评/聘], Last(js_zjpp.js_kssj) AS 开始时间, Last(js_zjpp.js_jssj) AS 结束时间
FROM js_zjpp
GROUP BY js_zjpp.js_sfzh;

Top

Kevin 发表于：2010-01-30 01:11:16

照抄啊!

dim str as string

str = "SELECT js_zjpp.js_sfzh AS 身份证号码, Last(js_zjpp.jx_nd) AS 资格类别, " & _

"Last(js_zjpp.js_jszc) AS 现任职称, Last(js_zjpp.js_pp) AS [评/聘], " & _

"Last(js_zjpp.js_kssj) AS 开始时间, Last(js_zjpp.js_jssj) AS 结束时间 " & _
"FROM js_zjpp GROUP BY js_zjpp.js_sfzh; "

然后你这个 str 在哪用就放哪...

比如: docmd.runsql str

上面是用 & _ 分行, 或者可以这样写...

str = "select .... "

str = str + "from ...."