在VBA中,如何把查询结果赋值给某些变量

冯先生　发表于：2008-06-10 08:18:41 　

比如在某个窗体模块中,有两个变量A和B

执行某个查询如:SELECT Count([月工资].工号) AS 姓名之计算, Sum([月工资].应发工资) AS 应发工资之总计
FROM 月工资;

如何把查询结果 Count([月工资].工号)和Sum([月工资].应发工资)赋值给变量A和B?

钱玉炜发表于：2008-06-10 08:35:24

用ado实现

dim rst as new adodb.recordset

dim strsql as string

strsql="SELECT Count([月工资].工号) AS 姓名之计算, Sum([月工资].应发工资) AS 应发工资之总计 FROM 月工资"

rst.open strsql,currentproject.connection,adOpenKeyset,adLockOptimistic

a=rst.fields(0)

b=rst.fields(1)

rst.close

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

Access交流中心