Calcular el factorial de un numero solucion iterativa Codigo Fuente en Visual Basic

Problema
Diseñar un algoritmo que permita calcular el factorial de un número. Utilice las estructuras repetitivas (Repetir Hasta).

Solución

• Entrada: 5

• Salida: 120

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 fact As Integer = 1
        Dim num As Integer
        num = TextBox1.Text
        For y As Integer = 1 To num
            fact = fact * y
        Next y
        TextBox2.Text = Trim(fact)
    End Sub
End Class

 Descargar Proyecto Visual Basic