Visual Basic - par o impar

alguien sabes si visual tiene alguna funcion para saber si un numero es par o impar???

Creo que esto me funciona bien

Private Function ParImpar(Numero As Integer)
Resultado = Numero / 2
If Resultado Like "*.*" Then
ParImpar = "Es ImPar"
Else
ParImpar = "Es Par"
End If
End Function

Private Sub Command1_Click()
MsgBox ParImpar(Val(Text1))
End Sub

O usan do Mod .....
if (Numero Mod 2) then
impar
Else
PAR
End If

GRACIAS, YA HABIA SOLUCIONADO ESO, ASI COMO JUAN