http://books.google.com/books?id=rec...lution&f=false
Question number 7: Movie Ticket Solution
I have coded with the following; however, the price field remains blank after I have coded the btnIf. Here is my code:
Private Sub btnIf_Click(sender As Object, e As EventArgs) Handles btnIf.Click
Dim txtAge As Integer
Dim lblPrice As Integer
If txtAge < 3 Then
lblPrice = 0
ElseIf txtAge > 3 Then
lblPrice = 9
ElseIf txtAge < 64 Then
lblPrice = 9
ElseIf txtAge < 65 Then
lblPrice = 6
End If
End Sub
Question number 7: Movie Ticket Solution
I have coded with the following; however, the price field remains blank after I have coded the btnIf. Here is my code:
Private Sub btnIf_Click(sender As Object, e As EventArgs) Handles btnIf.Click
Dim txtAge As Integer
Dim lblPrice As Integer
If txtAge < 3 Then
lblPrice = 0
ElseIf txtAge > 3 Then
lblPrice = 9
ElseIf txtAge < 64 Then
lblPrice = 9
ElseIf txtAge < 65 Then
lblPrice = 6
End If
End Sub