Private Sub txtAnswer_Validating(sender
As Object, e As
System.ComponentModel.CancelEventArgs) Handles txtAnswer.Validating
If txtAnswer.Text = "t" Or txtAnswer.Text = "f" Then
SaveQA()
Else
e.Cancel = True
MsgBox("Please
type either t or f as the answer. Then press Tab again.")
txtAnswer.Text = ""
End If
End Sub