ADODB RecordSet到字符串变量VBA

Question

关于ADODB记录集的快速问题。我想从记录集中提取查询结果并将其设置为字符串变量：

query = "SELECT Value1 FROM Table"
RS = New ADODB.Recordset
RS.Open(query,Conn)

查询总是返回3个值。我想把这三个值分配给一个变量。 RS.GetString返回分隔的查询结果选项卡，但我希望能够遍历此集并将每行结果分配给它自己的变量。有任何想法吗？提前谢谢！

Answer 1

您可以通过记录集按名称访问表列。

Dim strValue As String
strValue = rs.Fields("ColumnNameHere").Value

关于循环记录集

Do While rs.EOF = False

    strValue = rs.Fields("ColumnNameHere").Value
    msgbox (strValue)

rs.MoveNext
Loop

如果你只是在学习循环。您在某个时候需要了解rs.MoveFirst

一旦你完成了你的记录集，并且由于某种原因你想再次浏览它，你需要回到记录集的开头，然后再循环它。

记录集还有rs.Find和rs.Filter以及rs.Sort。

很多好东西。