数据库中查出的结果集如何使用？不是要显示
比如.NET可以用DataSet保存查出来的结果，还可以使用DataSet.DataTable(0).rows(index)来获取单个的记录甚至单个的字段值，
VB6中是怎么去处理的呢？
[解决办法]
用ADODB.Recordset
Dim rec_Data As ADODB.Recordset
Do Until rec_Data.EOF
strItem = rec_Data.Fields( "..... ")
rec_Data.MoveNext
Loop
