Private Sub 是否入职_AfterUpdate()
If check_是否入职 = True Then
DoCmd.OpenForm "window_人员明细", , acReadOnly
DoCmd.RunCommand acCmdRecordsGoToNew
'要判断並改写其他窗的数据,可用iif,并且iif可以在if...elseif下做低一級的判断
Forms("window_人员明细").所在地.Value = IIf(Me.check_深圳 = True, "深圳", "广州")
End if