使用另一个表单上的命令按钮过滤表单

Question

我有一个带有cmdbutton的表单，此刻打开另一个表单并显示几种类型的PartitionStyles和TrimFinishs（目前为486）的所有记录，我需要能够过滤第二个表单以仅显示TrimFinish I需要。

Private Sub lbl600SeriesS_Click（） Dim stDocName As String Dim stLinkCriteria As String

stDocName = "frmModules"
stLinkCriteria = "Forms!frmModules![TrimFinish] = 1"
DoCmd.OpenForm stDocName, , , stLinkCriteria

End Sub

目前它只显示一条新记录，我知道应该有162条记录使用1，我错过或做错了什么。

Answer 1

在frmModules的RecordSource中的字段上添加stLinkCriteria。因此，如果RecordSource包含一个名为TrimFinish的数字字段，请尝试以下方法：

stLinkCriteria = "[TrimFinish] = 1"

如果RecordSource是来自多个表的查询图，则可以使用表别名限定字段名称：

stLinkCriteria = "YourTableAlias.[TrimFinish] = 1"

如果您仍有问题，请编辑您的问题以描述frmModules的RecordSource。如果是查询，请粘贴查询的SQL视图。