VB一道编程急求

编写程序求：Ｓ＝１+２+３+４+………. +N。窗体上有一命令按钮，名称为cmd1，单击命令按钮在窗体上输出S的值，如图所示。

要求：1、正确写出事件过程。（2分）

2、根据题目需要对所用的变量进行定义(提示：S的类型为双精度型)。（2分）

3、N的值由Inputbox函数输入，Inputbox函数弹出的

对话框要有提示语句，语句内容自已设定。（2分）

4、写出正确的事件过程代码。（5 分）

5、写出正确的输出语句，在窗体上输出时要有输出提示“S＝”（2分）

Private Sub Command4_Click()
Dim s As Double
Dim i As Integer
n = InputBox("请输入N的值", "输入", "")
For i = 1 To n
s = s + i
Next
Print "s=" & s
End Sub

Private Sub Command1_Click() Dim s As Double n = InputBox("输入数n") For i = 1 To n s = s + i Next i Print s End Sub