一道VB作业题~~急等着正确答案~~

编程计算由下列公式确定的s值，其中n是用户输入的正整数，注意选用合适的变量类型。
1）s = 12 + 22 + 32 + … + n2
2）s = 11 × 22 × 33 × … × nn
3）S = 1 + 2！+ 3！ + 4！ + … + n！
4）s = 1 + 1 × 2 + 1 × 2 × 3 + … + 1 × 2 × 3 × … × n
5）s = 2 + 22 + 222 + … + 22…22 （n位）
6）S = 2/1 + 3/2 + 5/3 + 8/5 + 13/8 + 21/13 + ……（n项之和）
7）S=1+（1+2）+（1+2+3）+。。。。（1+2+3+4+…+N）的值

老师布置的，要求写出编程步骤，麻烦大家了......
你写的程序怎么不能执行？ 注意下第一、二题：
1）s = 1^2 + 2^2 + 3^2 + … + n^2
2）s = 1^1 × 2^2 × 3^3 × … × n^n

你回答的里有“=+”，这是错误的啊

不好意思，我没有给你写输入输出的代码。现在补上了，也补上最后两题的代码。
你把这段代码放到任一个sub里运行就行了。
Dim Sum(9) As Long '1-9题的答案，下标从0开始。
Dim i As Integer
Dim j As Integer
Dim N As Integer
Dim temp As Long
N = InputBox("请输入数字")

For i = 1 To N
Sum(0) = Sum(0) + i * 10 + 2
Next

For i = 1 To N
Sum(1) = Sum(1) + i * 10 + i
Next

temp = 1
For i = 1 To N
temp = temp * i
Sum(2) = Sum(2) + temp
Next

For i = 1 To N
temp = temp * i
Sum(3) = Sum(3) + temp
Next

temp = 0
For i = 1 To N
For j = 1 To i
temp += 2 * Pow(10, i - 1)
Next
Sum(4) = Sum(4) + temp
Next

Dim a As Integer
Dim b As Integer
a = 1
b = 1
For i = 1 To N
Sum(5) = Sum(5) + (a + b) / b
temp = b
b = a + b
a = temp
Next

For i = 1 To N
For j = 1 To i
temp += i
Next