Ms access 在Access中将值从一个窗体传递到另一个窗体

我有一个带有组合框的弹出表单，允许您从我的一个表的主键中选择一个值

选择一个值后，我希望弹出窗体关闭，另一个窗体打开，第一个窗体中选择的观察结果填充第二个窗体

除了关闭第一个弹出窗体外，此代码执行我想要的所有操作：

Private sub ID_AfterUpdate()
Dim id as String
id=Me.ComboBox
DoCmd.OpenForm "Part II",,,,,,id
end sub

此代码符合我的要求，但它没有关闭弹出窗体，因此我尝试：

Private sub ID_AfterUpdate()
Dim id as String
id=Me.ComboBox
DoCmd.Close
DoCmd.OpenForm "Part II",,,,,,id
end sub

但现在它根本不起作用了。我只是简单地获取对象不支持此属性或方法。 我还尝试：

Private sub ID_AfterUpdate()
Dim id as String
id=Me.ComboBox
DoCmd.OpenForm "Part II",,,,,,id
DoCmd.Close    
end sub

但这根本不起作用，不会打开第二个表单或关闭第一个表单。

在打开表单后，执行DoCmd.close acForm，Me.Name关闭当前表单的步骤该表单的代码模块包含您的ID\u AfterUpdate过程

私有子ID_更新后 作为字符串的Dim id id=Me.ComboBox DoCmd.OpenForm第二部分，，，id DoCmd.Close acForm，Me.Name 端接头 将DoCmd.Close替换为Me.Visible=False。