在 VBA 中使用 findfirst 条件搜索多个字段访问答案

【问题标题】：Search multiple fields access using findfirst criteria in VBA在 VBA 中使用 findfirst 条件搜索多个字段访问
【发布时间】：2013-09-11 23:20:01
【问题描述】：

以下代码在手机记录表中找到匹配项后在表单上填充值，在条件中，如何在 2 个不同字段中搜索值？我可以将组合框替换为文本框，并希望在 2 个字段中进行搜索，IMEI 和 Mob_number。

Private Sub Combo0_AfterUpdate()

Dim D As Database
Dim rsmob As Recordset
Dim Criteria As String

Set D = CurrentDb
Set rsmob = D.OpenRecordset("Mobile_Phones", DB_OPEN_DYNASET)

Criteria = "[MOB_NUMBER]='" & [Combo0] & "'"

rsmob.FindFirst Criteria

Me!Location = rsmob("User_Name")
Me!MODEL = rsmob("Model")
Me!IMEI = rsmob("IMEI")
Me!DIR = rsmob("DIR")
Me!Status = rsmob("Status")
Me!Account = rsmob("ACCOUNT")
Me!Plan = rsmob("Plan")
Me!MobOrWifi = rsmob("Mob_Or_Wifi")

rsmob.Close

End Sub

【问题讨论】：

标签： vba ms-access-2010 criteria findfirst

【解决方案1】：

如何在 2 个不同的字段中搜索值？ [IMEI 和 Mob_number]

您应该能够通过将语句更改为来搜索两个字段

Criteria = "[MOB_NUMBER]='" & [Combo0] & "' OR [IMEI]='" & [Combo0] & "'"

【讨论】：

我正要发布解决方案，因为我尝试了同样的方法并且它有效。我所做的是将 Combo 更改为文本框并执行以下操作：Criteria = "[MOB_NUMBER] = '" & [SearchBox] & "'" & " OR [IMEI] = '" & [SearchBox] & "' "