ADODB RecordSet 到字符串变量 VBA

Question

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

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

查询总是要 return 3 个值。我想把这三个值赋给一个变量。 RS.GetString returns 查询结果制表符分隔，但我希望能够遍历这个集合并将每一行结果分配给它自己的变量。有任何想法吗？提前致谢！

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。

很多好东西。

ADODB RecordSet to string variable VBA