如何实时刷新子窗体中组合框的数据

请问一下：如何实时刷新子窗体中组合框的数据 ？

合同号事件为 更新后 刷新子窗体。

Private Sub CEPY_AfterUpdate()
Me![ExportTaxDetailslinkSub].Requery
Me.Refresh
End Sub

可是再选完其它合同号后，子窗体中的“出口代码”组合框中的数据还是没刷新。所以只好关闭后再选其它合同号，如下图

请各位大虾赐教，谢谢^_^