Access多层表单数据录入优化：子表单新增行与费用录入方案问询

一、优化子子表单（费用录入）的操作体验 #

• 弃用 datasheet 视图，改用连续表单视图：
  1. 打开 subfrmFees 进入设计视图，将视图属性改为「连续表单」
  2. 自定义行布局：把FeeType下拉框、金额文本框、描述输入框按横向排列，可添加浅灰色行背景或分隔线提升辨识度，视觉和操作感远优于默认 datasheet
  3. 利用Access原生的主-子-子表单联动，取消按钮打开的方式：
     • 确保 frmLoad 绑定 tblLoad，subfrmStops 的「链接主字段/子字段」设为 LoadID
     • 将 subfrmFees 直接嵌入 subfrmStops 的下方，设置其「链接主字段」为 StopDetailID，「链接子字段」为 StopID。选中任意停靠点时，系统自动加载对应费用记录，无需手动传参

二、实现停靠点费用汇总与运单总计 #

• 单停靠点费用汇总：在 subfrmStops 中新增文本框，控件源设为 =Sum([subfrmFees].[Form]![Amount])，命名为 txtStopTotal，每个停靠点行将实时显示该点的费用总和
• 整运单总费用：在 frmLoad 底部添加文本框，控件源设为 =Sum([subfrmStops].[Form]![txtStopTotal])，命名为 txtLoadTotal，自动计算当前运单的所有费用总和
• 刷新同步：在 subfrmFees 的「更新后」事件中添加VBA代码，确保汇总值实时更新：

  Me.Parent.txtStopTotal.Requery
  Me.Parent.Parent.txtLoadTotal.Requery
  

三、备选方案（非嵌套子表单模式） #

• 使用选项卡控件拆分视图：在 frmLoad 中添加选项卡控件，一个标签页放置 subfrmStops（展示所有停靠点），另一个标签页放置 subfrmFees。通过VBA实现停靠点与费用的同步：

  ' subfrmStops 的点击事件
  Private Sub Form_Click()
      If Not IsNull(Me.StopDetailID) Then
          Me.Parent!subfrmFees.Form.RecordSource = "SELECT * FROM FeeDetails WHERE StopID = " & Me.StopDetailID & " AND LoadID = " & Me.Parent.LoadID
          Me.Parent!subfrmFees.Form.Requery
      End If
  End Sub
  

  这种方式让用户可在同一窗口切换查看停靠点列表和对应费用，操作逻辑更清晰

内容的提问来源于stack exchange，提问作者Kr Var