Question

使用函数完成1*2+2*3+3*4+...+n*(n+1)的运算，n由程序输入

这个是VB的一道题！

Answer 1

Private Sub Command1_Click()
Dim i As Integer, n As Integer, s As Long
n = Val(InputBox("n="))
For i = 1 To n
s = s + i * (i + 1)
Next i
Print s
End Sub

Answer 2

VB啊，我给个C的你自己修改下吧
main()
{
int a,n,m=0;
scanf("%d",&a);
for(n=1;n<=a;n++)
{
m+=(n*(n+1));
}

Answer 3

很简单的问题嘛
function f(n)
for i=1 to n
f=f+n*(n+1)
next
end function

你要算的结果=f(n)

Answer 4

Dim n, s
n = InputBox("请输入n：")
s = n * (n + 1) * (n + 2) / 3
print s