如何用vb6的for循环结构求出1到100累加总和实例

1、首先我们先启动vb6编程软件，到新建工程主界面，双击“标准exe”，得到一个新建工程FORML1 如图

2、然后在forml1窗口上加载一个命令按钮command1 如图

3、通过命令按钮的单击事件我们先定义”i“变量为整型”Dim i As Integer“，接下来定义's'变量用来累加”I"的和，也是整型”s As Integer“如图

4、然后给'I’和'S‘赋一个初值，”I“的初值为”1",因为's"现在还没有开始累加，所以初值为“0”如图

5、接下来我们用“for'循环变化”I“的值，它的初值应该等于1到100截止，然后每次它增长的量为”1“如图

6、然后定义循环变量为”I"，在当前循环过程当中重复不断的工作就是把“i"累加到“s"当中 如图

7、最后我们再窗体上输出”s"的值如图

8、这样程序就编写完了，然后运行一下程序，看结果如何，当我单击命令按钮（command1）时，最后前100个数累加的结果就已经从当前的窗体中显示出来了。