Access 2016：搜索结果显示在多个文本框中

Question

这项工作正在 Access 2016 中执行。创建了一个查询，然后根据该查询创建了一个表单。使文本框成为查询记录的搜索框。搜索脚本如下

Dim strsearch As String
Dim Task As String
'Check if a keyword entered or not
If IsNull(Me.txtSearch) Or Me.txtSearch = "" Then
   MsgBox "Please type in your search keyword.", vbOKOnly, "Keyword Needed"
   Me.txtSearch.SetFocus
Else
    strsearch = Me.txtSearch.Value
    Task = "SELECT * FROM [RSIDCircuit] WHERE ((RSID Like ""*" & strsearch & "*""))"
   Me.RecordSource = Task
End If

搜索按预期工作，但希望在多个可编辑的不同文本框中显示结果。希望第 1 列转到 text4，第 2 列转到 text5，依此类推。无法弄清楚如何让结果出现在各种文本框中。提交搜索后，其他文本框会空白，当所有搜索都未完成时，其他文本框会显示 table 的第一条记录。非常感谢任何帮助。

Answer 1

使用子窗体（在基础table的基础上创建一个连续的子窗体，可以使用设计器，不用写代码

然后，为了进行搜索，您只需将 sql 填入子表单，如下所示：

Task = "SELECT * FROM [RSIDCircuit] WHERE ((RSID Like ""*" & strsearch & "*""))"
me.mySubForm.Form.RecordSource = Task

结果看起来像这样：

您可以编辑结果，或者如上所示，我有结果，如果您单击眼镜图标，我运行此代码会启动一个 "drill down"详情表格查看数据

docmd.OpenForm "frmDetails",,,"ID = " & me!id

因此，要显示重复数据，请创建 + 使用通常称为连续表单的内容（功能区中的多个项目表单）。它会像魔术一样允许您显示重复数据行，但是当您设计表单时，您只需要 place/edit/design 一个带有一行文本框的表单，它会自动为您一遍又一遍地重复。

Access 2016：搜索结果显示在多个文本框中

Access 2016: Search result display in multiple text boxes

ms-access

ms-access-2016