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