Language Basics VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Language Basics
  4. A recursive procedure is one that calls itself
Public Function Factorial(N As Integer) As Integer
    If N <= 1 Then
        Factorial = 1
    Else
        Factorial = Factorial(N - 1) * N
    End If
End Function
Sub res()
   Debug.Print Factorial(4)
End Sub