VBNet проверяет, является ли номер четный или нечетный
If intInterger Mod 2 = 0 Then
'Even
Else
'Odd
End If
Salty Joe
If intInterger Mod 2 = 0 Then
'Even
Else
'Odd
End If