Sub ifTest2()
Dim intNum As Integer
Dim strMessage As String
intNum = 9
If intNum > 10 Then
strMessage = "The number is greater than 10"
Else
strMessage = "The number is less than 10"
End If
Debug.Print strMessage
End Sub