在2个子窗体的当前事件中添加
Me.Parent![文本9] = Me.Parent![文本5] + Me.Parent![文本7]
即
Private Sub Form_Current()
DoCmd.RunCommand acCmdSelectRecord
Forms![查询窗体]![文本5] = Me![姓名编号]
Me.Parent![文本9] = Me.Parent![文本5] + Me.Parent![文本7]
End Sub
Private Sub Form_Current()
DoCmd.RunCommand acCmdSelectRecord
Forms![查询窗体]![文本7] = Me![姓名编号]
Me.Parent![文本9] = Me.Parent![文本5] + Me.Parent![文本7]
End Sub