Question

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

我在Form中有一个ComboBox，我希望在SQL查询中将这些值返回到in语句中：

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 & ")"

访问2007如何将函数中的字符串返回到“in”语句中

1 个答案: