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

Question

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

Answer 1

我是这样做的，呵呵……
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

Answer 2

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

Answer 3

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

Answer 4

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