Question

我正在尝试从包含三个字段的表单调用访问查询（QRY_TimecardStatus）：周末日期，供应商名称和状态类型（带有多选的列表框）。

因为多了。需要在VBA中创建选择列表框条件我找到了一些效果很好的代码！

 Set DB = CurrentDb()
 Set Q = DB.QueryDefs("QRY_TimecardStatus")
 Q.SQL = "Select * From Data Where [Approval Status] In(" & Criteria & ");"

但是，我需要在上面的代码中添加其他两个字段标准。手动将SQL输入到Access中的SQL视图时，另外两个条件SQL语句的工作方式如下：

Like "*" & [Forms]![FRM_TimecardStatus]![suppliercb] & "*"
Like "*" & [Forms]![FRM_TimecardStatus]![StartDatetxt] & "*"

有人可以帮助构建所有三个表单字段所需的VBA并执行名为（QRY_TimecardStatus）的查询吗？

Answer 1

如果您尝试构建一个新查询，为什么还需要调用已定义的查询 - 选择其中一个：

以下内容应该有效：它将三个语句与<select id="sites" class="form-control" multiple="multiple"> <option value="1">Site 1</option> <option value="2">Site 2</option> <option value="3">Site 3</option> </select> <input type="hidden" name="sites" id="sites_hidden">结合起来（您也可以使用AND，不确定，需要什么）并将其包含在OR中。您需要指定要过滤的两个字段。

使用LIKE＆amp; Access访问VBA SQL语句和

1 个答案: