Solución 3.6 Realizar un cálculo factorial

Código de la función:

Function Factorial(intNumero As Integer) As Double  
    If intNumero > 0 Then 
        Factorial = Factorial(intNumero - 1) * intNumero 
    Else 
        Factorial = 1 
    End If 
End Function

Comentario

Esta función se IIama recursiva ya que la función Factorial se llama a sí misma. Se puede escribir de una manera más clásica: ...