要实现从一窗体调用执行另一个窗体命令,不同的人会用不同的方法,有的喜欢通过定义一个公用的涵数,在不同窗体调用相同的涵数;也有的用TIMER事件去触发另一个
窗体的事件。这里介绍一个小方法跟大家
分享:
窗体1为被调用的窗体名,并建一个按钮作为测试对象:
Private Sub Command0_Click()
MsgBox "你已经实现了从一窗体执行另一个窗体的命令"
End Sub
下面是窗体2代码调用窗体1并执行Command0_Click()
Private Sub Command0_Click()
DoCmd.Open Form "窗体1"
DoEvents '这个必须,否则只能在弹出窗体才能正确运行
Forms!窗体1.Command0.SetFocus
SendKeys "{ENTER}"
End Sub
哈哈,是不是很简单呢。这其实不是我想要的结果,最终希望能够通过API来现实不同窗体及不同程序间的互相呼唤调用,只可惜 ACCESS 控件的句柄有点麻烦,暂时还没能借用PostMessage实现更强大的功能。大家将就一点,等完善后就和大家分享!!
窗体1为被调用的窗体名,并建一个按钮作为测试对象:
Private Sub Command0_Click()
MsgBox "你已经实现了从一窗体执行另一个窗体的命令"
End Sub
下面是窗体2代码调用窗体1并执行Command0_Click()
Private Sub Command0_Click()
DoCmd.Open Form "窗体1"
DoEvents '这个必须,否则只能在弹出窗体才能正确运行
Forms!窗体1.Command0.SetFocus
SendKeys "{ENTER}"
End Sub
哈哈,是不是很简单呢。这其实不是我想要的结果,最终希望能够通过API来现实不同窗体及不同程序间的互相呼唤调用,只可惜 ACCESS 控件的句柄有点麻烦,暂时还没能借用PostMessage实现更强大的功能。大家将就一点,等完善后就和大家分享!!