Code:
Private Sub Combo1309_AfterUpdate()
If Me.Combo1309.Value = "Yes" Then
Me.Text1307 = Environ("UserName")
ElseIf Me.Combo1309.Value = "No" Then
Me.Text1307 = Environ("UserName")
End If
End Sub
I am using the above code to capture the login information. Is it possible to add a second criteria to the Me.Combo1309.Value = "No" that also highlights the Textbox (Gender) Red? Ideally, the value in this textbox would be switched to the opposite, but this option might be more trouble then its worth. Thanks.