编写一个程序,单击窗体实现求S=1+2+3+……+100的值.要求直接在窗体上输出1+2+3+……+100=S的最终结果

Private Sub Form_Click()
s = 0
For i = 1 To 100
s = s + i
Next i
Print "1+2+...+100="; s
End Su