Determinar si un número es par o impar Codigo Fuente en Visual Basic

Problema
Determinar si un número es par o impar
 
Solución

• Entrada: 5

• Salida: 5 es impar

Codigo Fuente en Visual Basic

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object,
    ByVal e As System.EventArgs) Handles Button1.Click
        Dim a As Integer
        a = TextBox1.Text
        If (a Mod 2 = 0) Then
            TextBox2.Text = "El numero " + Trim(a) + " es par"
        Else
            TextBox2.Text = "El numero " + Trim(a) + " es impar"
        End If
    End Sub
End Class

Descargar Proyecto Visual Basic