在调用新表单时将变量的值传递给新表单。例如:
在旧表单中:
Private Sub btnOpenNewForm_Click() DoCmd.OpenForm "NewFormName", acNormal, , , , acDialog, Me.txtOldFormVariable.Value End Sub
在新表单中:
Private Sub Form_Load() If Not IsNull(Me.OpenArgs) Then Me.txtNewFormVariable.Value = Me.OpenArgs End If End Sub
这将允许新表单访问旧表单变量,并在新表单中使用新变量名存储该值。