sql - 访问 2007 如何将字符串从函数返回到“in”语句

Question

你能帮我解决这个问题吗？

我有一个ComboBox表单，我想将这些值返回到inSQL 查询中的语句中：

SELECT *
FROM [Actual_list query]
WHERE ((([Actual_list LSC query].[place]) In (([Forms]![Internal forms]![Places].Value))));

Answer 1

您将需要在 VBA 中构建您的 SQL。您可以从组合中获取列表。

这是一个数字列表，字符串列表需要引号。

For Each itm In Me.PlacesListbox.ItemsSelected
  listofvalues = listofvalues & "," & Me.PlacesListbox.Column(0, itm)
Next

listofvalues = Mid(listofvalues,2)

sSQL="SELECT * FROM [Actual_list query] " _
    & "WHERE [Actual_list LSC query].[place] In (" & listofvalues & ")"