到目前为止,我的代码是这样的。最后一行给了我一个编译错误:“预期的语句结束”。

Dim strSql As String
Dim groupId As String

strSql = "Select ID from RevenueGroup where description = '" & ListO.Value & "'"
groupId = CurrentProject.Connection.Execute strSql

最佳答案

你正在看类似这样的东西

Dim strSql As String
Dim groupId As String

strSql = "Select ID from RevenueGroup where description = '" & ListO.Value & "'"

Dim rec As Recordset
set rec= CurrentProject.Connection.Execute strSql

groupId = rec(0)

您需要将查询结果设置为记录集,然后从其结果中提取第一个值。没有所有定义的变量,我无法完全编译它,但这应该是一个很好的模板。

关于sql - 如何将 select 语句的结果存储在变量中?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/2343848/

10-11 22:14