'在A窗体中设置B窗体中组合框的值 Private Sub Command9_Click() OpenFormAneCloseMe ("订单管理") '注意这里是先打开窗体,等窗体打开后再设置值 Forms("订单管理").Controls("Combo53").Value = "全部" Forms("订单管理").Combo53_AfterUpdate '手动执行事件 End Sub 'B窗体中的事件,注意这里的Public为全局,默认是Private私有,要改 Public Sub Combo53_AfterUpdate() setDate FilterTable End Sub
既然它不会自动触发,我们就手动让它运行.
你也可以在B窗口中的load事件中手动执行事件,这样就不用改成全局过程了
Private Sub Combo53_AfterUpdate() setDate FilterTable End Sub Private Sub Form_Load() Combo53.Value = "全部" Combo53_AfterUpdate '手动执行 End Sub
标签:控件,End,Sub,AfterUpdate,Private,access,窗体,Combo53 From: https://www.cnblogs.com/yoooos/p/17552199.html