In the Title textbox control's BeforeUpdate event, put this:
Code:
Select Case Me.Title
Case "Mr", "Mr."
Me.Gender = "Male"
Case "Mrs", "Mrs.", "Ms", "Ms.", "Miss"
Me.Gender = "Female"
Case Else
Me.Gender = "It's Pat!"
End Select
I wouldn't recommend storing the word "Male" or "Female" though. Make it a number and use a lookup. 1 = Male, 2 = Female.
Using a numeric lookup makes sense because with 10,000 records, you are storing 10KB of data compared to 50KB+ of data with full words. If you'd rather not use numbers and a lookup table, use "M" or "F". It's the same effect.