Here is my code:
Dim Seat As String
Seat = txtSeat.Text.ToUpper
If Seat = "BOX" Then
txtPrice.Text = FormatCurrency(75)
ElseIf Seat = "PAVILION" Then
txtPrice.Text = FormatCurrency(30)
ElseIf Seat = "LAWN" Then
txtPrice.Text = FormatCurrency(21)
End If
My ordeal is I need to display an information/error box when the user does not type one of the specified words. So if I instead type “cat” a message box will appear saying “Please instead type one of the seats in the list :)”.
Edit:
That worked perfectly mootinator thankyoU!
1 Answer