怎么将数据库统计结果取回到vb

如何将数据库统计结果取回到vb
如何将数据库统计结果取回到vb，如 select sum(金额）as aa from sale vb程序怎样取得aa的值？

[解决办法]

VB code

rs.open "select sum(金额）as aa from sale",conn,adopenkeyset,adlockreadonlyif rs.recordcount>0 then    if not isnull(rs!aa) then        msgbox rs!aa        text1.text=rs!aa    end ifend ifrs.close