Is Number Odd?

[T.Jackson]

in VB

If ((Text1.Text Mod 2) = 0) Then
        MsgBox "Even"
    Else
        MsgBox "Odd"
    End If

That's pretty uncanny bud, because I just wrote this ...

Dim num As Integer
Dim oddNum As Boolean

num = 5

If num Mod 2 = 0 Then
   oddNum = False
Else
   oddNum = True
End If

I reckon that there's a recursive way of doing it too!

Trent Jackson