50分的简单问题：如何将SELECT赋值给一个变量？

[green_hong]

比如：SELECT MAX（XX）。。。。
SELECT COUNT（XX）。。。。
等等，结果为单值的查询，赋给一个变量，而不用使用结果集。

谢下先！！！

[XLYT]

做一个存储过程，返回得到的值，再到VB里用adodb.command取回这个值。

[loverface]

我是这样做的，呵呵……
Dim rs As ADODB.Recordset
Dim cn As ADODB.Connection
Dim M, C As Single
………………
rs.Open "select max(XX),count(XX) from table", cn
M = rs(0)
C = rs(1)
Debug.Print M, C

[xks]

dim cmd as string
Dim rs As ADODB.Recordset
cmd.commandtext="select max(XX),count(XX) from table where 条件"
set rs=cmd.execute

[fling_boy]

select 的查询结果总是一个记录集，不管返回几条记录，几个字段。
所以用rs是达不到你的要求。
用command执行存储过程到是可以.

[qiume]

fling_boy 的没错!!!

[green_hong]

多谢楼上各位的回复。
我试了一下，感觉loverface(双面人)的方法简洁实用，给20分。
其余给10分，大家不会有意见吧？

再一次多谢大家！！！！