这是两个子窗体控件，要“返回修改记录的原始定位”时，窗体不要加载事件。
一、去掉代码：Private Sub Form_Load()
   Me.RecordSource = "Select * FROM tblcgdd Where cgddId = '" & selectstr & "'"
     g_CurrentSelectStrID = selectstr
End Sub
二、修改窗体代码中：  '触发子窗体计时器事件
                            Forms!usysfrmMain!frmChild.Form!Child1.Form.TimerInterval = 300  （child1为第一个子窗体的名称）
有一个子窗体的代码： Forms!usysfrmMain!frmChild.Form.TimerInterval = 300