到目前为止,我的代码是这样的。最后一行给了我一个编译错误:“预期的语句结束”。
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/