Programación VB, por favor ayúdenme
Sub privado Form_Click()
Dim x, n, i, res
x = Val(InputBox("Datos de entrada x")): n = Val(InputBox("Datos de entrada n"))
Para i = 2 To n
res = res + x ^ (i - 1) / jc(i)
Siguiente i
MsgBox res
End Sub
Función jc(m)
Dim j, tem
tem = 1
Para j = 1 Para m
tem = tem * j
Siguiente j
jc = tem
Función final