Factorial de un número

Question

Hola, 

Me gustaría saber si hay una forma sencilla de calcular el factorial de un numero. Por ejemplo, si tengo un total de 10 bolas y 3 son negras y 7 azules, cuantas combinaciones posibles hay?. Es decir, para eso necesito saber como calcular el factorial de 3 de 7 y de 10.

Si alguien sabe alguna forma que me lo diga por favor. Si hay alguna manera de hacerlo usando alguna formula de microsoft visual basic en vez de con funcione sy mejor; sino, no pasa nada.

PD: Lo necesito para VB 5.0

Gracias.

Answer 1

Puedes usar esta función recursiva:

Public Function Factorial(Num As Double) As Currency
If (Num > 0) Then
   Factorial = Num * Factorial(Num - 1)
Else
   Factorial = 1
End If
End Function

---

Saludos, Javier J

Answer 2

Currency que usa para especificar que la funcion es recursiva?

Answer 3

No, Currency es el tipo de dato que devuelve.

Es recursiva porque se llama a si misma.

---

Saludos, Javier J