Vbnet verifique se o número é par ou estranho

If intInterger Mod 2 = 0 Then
'Even
Else
 'Odd
End If
Salty Joe