截图:
示例代码:
(1)frmOpen窗体,传递按钮单击事件:
Private Sub cmdOpen_Click() DoCmd.OpenForm "窗体1" '打开窗体1 End Sub
(2)窗体1加载事件:
'加载窗体1时,在被调用的窗体里直接引用调用窗体的控件的值 如:forms("调用的窗体").控件名.value Private Sub Form_Load() Me.Text8 = Form_frmOpen!商品编码.Value End Sub