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