access按钮事件在子窗体打开窗体或报表

Private Sub Com1_Click()
Me.win.SourceObject = "窗体1"
End Sub

Private Sub Com2_Click()
Me.win.SourceObject = "窗体2"
End Sub