在IN语句中使用文本框值

Question

我想让它工作？ 如何设置要在IN()语句中使用的文本框？ 我希望用户能够列出他们要查询的国家/地区

SELECT *
FROM Table
WHERE CountryID IN (forms!frmImport!txtCountries)

Answer 1

您不能只将文本框的名称直接放入SQL字符串中。
相反，您需要使用文本框的内容来构建如下的SQL字符串：

SELECT * FROM Table WHERE CountryID IN (1,2,3)

如果您的用户在文本框中输入以逗号分隔的CountryID列表，则可以按以下方式构建SQL：

Dim SQL As String

SQL = "SELECT * FROM Table WHERE CountryID IN (" & Forms!frmImport!txtCountries & ")"

但是我不会这样做，因为它很简单，但是容易出现输入错误和SQL注入。

更好的方法是使用列表框，设置“ Multi Select属性（以便可以选择多个条目） ，然后用所有可用国家/地区的列表填充它。

然后，用户可以选择所需的内容，然后可以使用列表框中的选定项来构建SQL字符串：

Dim ListItem As Variant
Dim CountryList As String
Dim SQL As String

For Each ListItem In Forms!frmImport!lstCountries.ItemsSelected
    If CountryList > "" Then
        CountryList = CountryList & ","
    End If
    CountryList = CountryList & ListItem
Next

SQL = "SELECT * FROM Table WHERE CountryID IN (" & CountryList & ")"