如何使用表单在Microsoft Access 2010中搜索表并在报表中显示结果

时间:2016-06-28 14:34:43

标签: ms-access search access-vba report dao

我是Access的新手,我在查找如何执行搜索方面遇到了一些麻烦。 我有一个表包含多个字段的记录和一个名为“Serial”的主键字段。

我创建了一个链接到该表的表单,它包含的是一个文本框和一个按钮,用户可以在其中键入任何单词或序列号以及任何内容,并且将搜索表以查找具有字段的记录符合输入的标准。

我已经到了可以搜索表并查找匹配的任何记录但我无法弄清楚如何将此记录(以及匹配的任何其他记录)发布到新创建的报告以便用户可以看到符合他标准的所有结果。

我的代码是这样的,输出只给出一个空白报告。

msgbox行始终为每次搜索输出正确的序列号。

我认为该问题与DoCmd.OpenReport行有关。

Do While Not rs.EOF 'iterate through table and check all fields
For Each Field In rs.Fields
    If Field = SearchBar.Value Then
        found = True
        MsgBox (rs.Fields("Serial")) 'debugging
        **DoCmd.OpenReport "Asset Inv", acViewReport, , "[Serial] = '" & rs.Fields("Serial") & "'"**
        Exit For
    End If
Next Field

If found Then
    Exit Do            
Else
    rs.MoveNext
End If
Loop

感谢您的帮助!

1 个答案:

答案 0 :(得分:1)

如果您想基于一个关键字在多个字段中搜索,请执行以下步骤:

1-假设我们有以下表格想要在多个字段中使用关键字进行搜索

2-打开查询设计并选择您想要搜索的表

3 - 通过Dbl点击所需字段向字段添加字段

4 - 现在单击空白列并转到设计选项卡

5-Save You Query

5单击“构建器”

6 - 从列表中选择您保存的查询

7 - 选择要搜索的字段并附加它们

concatinate Fields That You Want Search in

8 - 现在你有了包含所有所需字段的新列

9-Now In Criteria Section Type" " + [] +" "

10-运行查询

Write "Like" Sql Command And Run Query

享受它......