Public Class Form1
Private Sub btnIf_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnIf.Click
Dim intNumber As Integer = 27
If intNumber = 1000 Then
MessageBox.Show("'intNumber' is,indeed,1000!", "Simple If")
ElseIf intNumber = 27 Then
MessageBox.Show("'intNumber' is 27!", "Simple If")
Else
MessageBox.Show("'intNumber' is not indeed 1000!", "Simple If")
End If
End Sub
End Class