如何在 Access 365 中制作搜索表单
How do I make a search form in Access 365
我目前正在尝试为我的数据库创建一个搜索表单。我想把它放在导航窗体中(所以我听说我不能使用拆分窗体)。我目前有一个包含 4 个文本框和一个组合框的表单,总共有 5 个条件,每个条件都有一个单独的按钮进行搜索。下面是基于我的 table 的查询。这是我到目前为止所做的
不过,我在如何实际执行搜索方面遇到了瓶颈。我在这个项目之前从未使用过访问权限,也不知道如何使用 VBA(但我知道其他语言)。是否可以使用宏执行搜索?如果没有,我将如何制作搜索子程序?
您采用的方法是构建搜索表单并开发和测试搜索表单。让它工作?然后,您可以将此工作表单放入现有的“导航表单集”。
有无数种方法可以做到这一点——你只受限于你的想象力。然而,一个常见的设置是创建一个“主”表单。这个主窗体可以有几个文本框供您输入搜索值。然后您使用向导创建一个“结果”表单(一种很好的表单,您可以在其中显示结果供用户查看并选择结果)。
事实上,您真的不必使用表单 + 子表单,但我发现这通常比将“条件”框放在表单标题区域中效果更好。
因此创建主窗体——这个窗体是未绑定的(未附加到系统中的任何 table)。玩得开心,想怎么排就怎么排。
然后使用向导创建多项目表单。用漂亮的栏来布置表格。现在主窗体处于设计模式,只需拖放“显示结果”窗体即可。
结果是一个如下所示的访问表单:
在上面,注意用户是如何“输入”某些标准的。
因此,您在更新事件“之后”的文本框中放置了一些代码。它可能看起来像这样:
将 strSql 变暗为字符串
strSql = "select * from tblCustomer where LastName like " & me.txtLastName
& "*"
me.MySubFormname.Form.RecordSource = strSql
所以我们即时“构建”sql,并将sql“填充”到子表单中以显示结果。
另请注意,在上面的连续项目表单中,我们有一个“查看”或“编辑”按钮,当单击时可以启动一个详细表单来记录您 select。在我的示例中,我为按钮使用了“眼镜”图标。因此,该按钮背后的代码是:
Docmd.OpenForm "frmEditDetails","id = " & me!id
编辑:sql 字符串必须正确,所以在上面,它应该是:
dim strSql as string
strSql = "select * from tblCustomer where LastName like '" & me.txtLastName & "*'"
debug.print strSql
me.MySubFormname.Form.RecordSource = strSql
所以只需要很少的代码。剩下的就是你喜欢的 UI.
的布局方式。
我目前正在尝试为我的数据库创建一个搜索表单。我想把它放在导航窗体中(所以我听说我不能使用拆分窗体)。我目前有一个包含 4 个文本框和一个组合框的表单,总共有 5 个条件,每个条件都有一个单独的按钮进行搜索。下面是基于我的 table 的查询。这是我到目前为止所做的
不过,我在如何实际执行搜索方面遇到了瓶颈。我在这个项目之前从未使用过访问权限,也不知道如何使用 VBA(但我知道其他语言)。是否可以使用宏执行搜索?如果没有,我将如何制作搜索子程序?
您采用的方法是构建搜索表单并开发和测试搜索表单。让它工作?然后,您可以将此工作表单放入现有的“导航表单集”。
有无数种方法可以做到这一点——你只受限于你的想象力。然而,一个常见的设置是创建一个“主”表单。这个主窗体可以有几个文本框供您输入搜索值。然后您使用向导创建一个“结果”表单(一种很好的表单,您可以在其中显示结果供用户查看并选择结果)。
事实上,您真的不必使用表单 + 子表单,但我发现这通常比将“条件”框放在表单标题区域中效果更好。
因此创建主窗体——这个窗体是未绑定的(未附加到系统中的任何 table)。玩得开心,想怎么排就怎么排。
然后使用向导创建多项目表单。用漂亮的栏来布置表格。现在主窗体处于设计模式,只需拖放“显示结果”窗体即可。
结果是一个如下所示的访问表单:
在上面,注意用户是如何“输入”某些标准的。
因此,您在更新事件“之后”的文本框中放置了一些代码。它可能看起来像这样:
将 strSql 变暗为字符串
strSql = "select * from tblCustomer where LastName like " & me.txtLastName & "*"
me.MySubFormname.Form.RecordSource = strSql
所以我们即时“构建”sql,并将sql“填充”到子表单中以显示结果。
另请注意,在上面的连续项目表单中,我们有一个“查看”或“编辑”按钮,当单击时可以启动一个详细表单来记录您 select。在我的示例中,我为按钮使用了“眼镜”图标。因此,该按钮背后的代码是:
Docmd.OpenForm "frmEditDetails","id = " & me!id
编辑:sql 字符串必须正确,所以在上面,它应该是:
dim strSql as string
strSql = "select * from tblCustomer where LastName like '" & me.txtLastName & "*'"
debug.print strSql
me.MySubFormname.Form.RecordSource = strSql
所以只需要很少的代码。剩下的就是你喜欢的 UI.
的布局方式。