¿Cómo utilizar la función xn en vb?

El uso de funciones personalizadas de xn es un buen hábito de programación y una forma eficaz de reutilizar código.

Por supuesto, también puedes escribir tu propio código sin utilizar la función xn.

¡El siguiente código realiza correctamente la misma operación z=(x-2)! Cálculo de +(x-3)!+(x-4)!+.....(x-N)!.

Subcomando privado1_Click()

Atenuar n como entero

Atenuar i como entero

Atenuar t como entero

Dim z As Long, x As Single

Dim j As Integer

Dim tmp As Long

n = Val(Text1.Text)

x = Val(Texto2.

z = 0

Para i = 2 To n

t = x - i

tmp = 1

Para j = 1 A t

tmp = tmp * j

z = z + tmp

Label1.Caption = z

End Sub

¡Feliz día!