Page 130 - TCS ICT Book 8
P. 130
The City School 2021-2022
If number >= 7 Then
lblResult.Text = “Congratulations! You win”
Else
lblResult.Text = “No luck...Try Again”
End If
End Sub
End Class
If...Then...Elseif Statements
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim score As Integer
Dim grade As String
score = TextBox1.Text
If score >= 90 Then
grade = “A”
ElseIf score >= 80 Then
grade = “B”
ElseIf score >= 70 Then
grade = “C”
Else
grade = “Needs improvement”
End If
lblGrade.Text = grade
End Sub
End Class
130
