Access绑定表单搜索新增记录及子表单仅显单条记录求助

问题1：点击搜索新增记录而非显示匹配记录 #

原因：主表单绑定到Dynamic表，直接给绑定控件赋值（比如Me.Sal_Order = rs!Sal_Order）时，Access会自动触发新增记录逻辑——绑定表单默认处于可编辑状态，赋值操作会被识别为创建新记录。

两种修正方案：

• 方案1：用FindFirst定位匹配记录，避免手动赋值触发新增
• 方案2：重新设置主表单记录源，直接加载匹配结果

方案1代码示例 #

Dim strFilter As String
' 注意：如果Sal_Order/Item是文本类型，必须用单引号包裹条件值
strFilter = "Sal_Order = '" & Me.search_SO & "' AND Item = '" & Me.Search_Item & "'"

' 定位到匹配记录
Me.Recordset.FindFirst strFilter

If Me.Recordset.NoMatch Then
    Me.Undo
    MsgBox "未找到匹配记录"
End If

方案2代码示例 #

Dim strSQL As String
' 文本类型字段加单引号，数字类型则去掉
strSQL = "SELECT * FROM Dynamic WHERE Sal_Order = '" & Me.search_SO & "' AND Item = '" & Me.Search_Item & "' ORDER BY ID DESC"
' 重置主表单记录源并刷新
Me.RecordSource = strSQL
Me.Requery

问题2：子表单仅显示一条匹配记录 #

常见原因及解决方法：

1. 视图设置错误：检查子表单的默认视图属性，若设为单一窗体，只会显示单条记录，改为连续窗体或数据表即可。
2. SQL语法错误：原代码中未给文本类型的查询条件加单引号，会导致查询结果异常，修正SQL语句（参考上述单引号添加规则）。
3. 冗余链接字段：若子表单设置了不必要的链接主字段/链接子字段，会过滤掉部分记录，可清空这两个属性（无需关联主表单当前记录时）。

修正后的子表单代码 #

Dim newRS As String
' 文本类型字段加单引号
newRS = "SELECT * FROM Dynamic WHERE Sal_Order = '" & Me.search_SO & "' AND Item = '" & Me.Search_Item & "' ORDER BY ID DESC"
Me!Subform1.Form.RecordSource = newRS
' 仅需Requery重新加载数据源，Refresh仅刷新当前记录
Me!Subform1.Form.Requery

通用注意事项 #

• 文本类型的查询条件必须用单引号包裹，数字类型则不需要，否则会出现SQL语法错误或查询结果偏差。
• 绑定表单操作时，优先使用FindFirst或重置记录源来定位/加载数据，避免直接给绑定控件赋值触发意外新增。

内容的提问来源于stack exchange，提问作者sam goto