Check whether a Number is Odd or Even

The VBScript Mod operator divides two numbers and returns the remainder. So in our code the parameter 'iNumber' passed into our subroutine OddEvenNumber is divided by 2. If the remainder is 0 then the number is even.

<%
Sub OddEvenNumber(iNumber)
If iNumber MOD 2 = 0 Then
Response.write "The number " & iNumber & " is EVEN<br />"
Else
Response.write "The number " & iNumber & " is ODD<br />"
End If
End Sub

'Call our sub and pass in the number 4 as a parameter
Call OddEvenNumber(4)
'Call our sub and pass in the number 13 as a parameter
Call OddEvenNumber(13)
%>

The result of our code above is:
The number 4 is EVEN
The number 13 is ODD

If you have any code snippets to share with full credit given then send an email to Codesnippets - You'll receive full credit and a link back to your site.

ASP.NET 3.5/2.0 Web Hosting: 3 Months FREE – Click Here!