Software & Finance

Visual Basic - Factorial of a Number using Recursive Function


I have given here VB Progarm to find a factorial of a number using recursion.


It is designed using WinForm. Winform would look like,



The source code to find factorial is given below:


    Public Class Form1

        Private Function Fact(ByVal n As Integer)
            If (n = 0) Then
                Fact = 1
                Fact = n * Fact(n - 1)
            End If
        End Function
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Dim n As Integer
            n = Integer.Parse(TextBox1.Text)
            Label2.Text = Fact(n).ToString()
        End Sub
    End Class



The output screen would be,