调用子窗体的一个过程时候出错，请高手指点。（高分求解）

[bigworld]

我在母窗体的按钮的Click事件中调用了其子窗体的一个过程（Public），其中有一段代码中有如下代码。
执行到DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70的时候出错了，错误信息为SaveRecord无效什么的。到底问题出在哪里，请指教。
If MsgBox("Are you sure to update the data?", vbYesNo, "Data Update Query", "", 1000) = vbYes
Then
DoCmd.SetWarnings False
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
hasChangeData = True
End If

[bigworld]

补充一点：我在子窗体自身调用这个过程的时候没有问题。

[changechange]

子窗体中保存当前窗体的代码无效，因为 子窗体根本没有打开，你需要在母窗体中写代码，而不是调用子窗体中的代码