programa que calcula si un numero es par o impar hecho por monica gabriela segundo gonzalez

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim numero As Integer

        Dim resultado As Double

        numero = TextBox1.Text

        resultado = 1

        For x = numero To 2 Step -1

            resultado = x * resultado

        Next

        Label3.Text = resultado

    End Sub

End Class