ADODB RecordSet 到字符串变量 VBA

【问题标题】：ADODB RecordSet to string variable VBAADODB RecordSet 到字符串变量 VBA
【发布时间】：2016-01-14 10:19:00
【问题描述】：

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

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

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

【问题讨论】：

【解决方案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。

很多好东西。

【讨论】：