VBA基础
Access从一个窗体调用另一个窗体命令的方法
2013-08-24 16:38:06
早上有朋友问到如果调用另一个窗体的命令，要实现从一窗体调用执行另一个窗体命令，不同的人会用不同的方法，有的喜欢通过定义一个公用的涵数，在不同窗体调用相同的涵数；也有的用TIMER事件去触发另一个窗体的事件。这里介绍一个小方法跟大家分享：
窗体1为被调用的窗体名，并建一个按钮作为测试对象：
Private Sub Command0_Click()
MsgBox "你已经实现了从一窗体执行另一个窗体的命令"
End Sub
下面是窗体2代码调用窗体1并执行Command0_Click()
Private Sub Command0_Click()
DoCmd.OpenForm "窗体1"
DoEvents '这个必须,否则只能在弹出窗体才能正确运行
Forms!窗体1.Command0.SetFocus
SendKeys "{ENTER}"
End Sub
以后一个好的办法就是
将窗体1的事件 Private 改为 Public