使用链接到子窗体的文本框搜索 MS Access 窗体上的多个字段

Question

我想从主表单上的未绑定文本框中搜索子表单的多个字段，但它似乎没有过滤任何内容。也没有出现错误消息。我的代码是：

Private Sub btnSearch2_Click()
Dim strfilter As String
If Me.GlobalSearch.Value <> "" Then
Me.FilterOn = False
Me.GlobalSearch.SetFocus
Else
strfilter = "(HarvestId LIKE '*" & Me.GlobalSearch.Value & "*' OR "
strfilter = strfilter & "AssignedTo LIKE '*" & Me.GlobalSearch.Value & "*' OR "
strfilter = strfilter & "HarvestStatus LIKE '*" & Me.GlobalSearch.Value & "*')"
End If
'If strfilter <> "" Then
'Me.Filter = strfilter
'Me.FilterOn = True
'Else
'Me.FilterOn = False
'End If
End Sub

其中，GlobalSearch 是搜索文本框，HarvestId、AssignedTo 和 HarvestStatus 是我要在子窗体中搜索的字段。为什么代码不起作用？谢谢马里语

Answer 1

假设您的子窗体称为 HarvestSub ，请将注释的代码替换为以下内容：

If strfilter <> "" Then
    Me.HarvestSub.Form.Filter = strfilter
    Me.HarvestSub.Form.FilterOn = True
Else
    Me.HarvestSub.Form.FilterOn = False
End If