access vba如何在子窗体中加载不同窗体

在 Access VBA 中，在子窗体中加载不同的窗体（Form），通常是在Form_Load事件或者某个触发条件满足时执行。你可以通过以下步骤来实现：

1. **创建宏**：
- 首先，创建一个宏（如名为`LoadNewForm`）用于加载新的窗体。在Visual Basic编辑器中，打开“开发工具”视图，点击“宏”，然后添加一个新的宏，编写如下VBA代码：

   Public Sub LoadNewForm(formName As String)
       Dim newForm As Object
       On Error GoTo FormError

       Set newForm = CurrentDb.OpenForm(formName) ' 使用表名替换 formName
       newForm.RecordSource = "" ' 清除记录源，如果不需要记录集的话
       newForm.Show ' 显示新窗体

   ExitMacro:
       Exit Sub

   FormError:
       MsgBox "无法加载窗体 '" & formName & "'，错误信息：" & Err.Description, vbCritical, "加载失败"
       Resume ExitMacro
   End Sub

2. **调用宏**：
- 在子窗体的某个事件（如Form_Load或按钮点击）中，调用上述宏并传入你想要加载的新窗体的名称：

   Private Sub Subform_Load()
       ' 调用宏加载新的子窗体
       Call LoadNewForm ("NewForm") ' 替换成实际的新窗体名称
   End Sub

3. **处理窗体的保存与关闭**：
- 在加载新窗体之后，记得处理新窗体的保存和关闭逻辑，以及旧窗体的隐藏或撤销显示。