在VB6的编写程序中，我们经常要用到循环结构，vb6提供了3种不同风格循环结构：计数循环，do循环，当循环。今天我们就以计数循环（for）循环为实例来制作一个简单的小程序，下面我们就以1到100累加为例制作一个FOR循环小程序
首先我们先启动vb6编程软件，到新建工程主界面，双击“标准exe”，得到一个新建工程FORML1 如图
然后在forml1窗口上加载一个命令按钮command1 如图
通过命令按钮的单击事件我们先定义”i“变量为整型”Dim i As Integer“，接下来定义's'变量用来累加”I"的和，也是整型”s As Integer“如图
然后给'I’和'S‘赋一个初值，”I“的初值为”1",因为's"现在还没有开始累加，所以初值为“0”如图
接下来我们用“for'循环变化”I“的值，它的初值应该等于1到100截止，然后每次它增长的量为”1“如图
然后定义循环变量为”I"，在当前循环过程当中重复不断的工作就是把“i"累加到“s"当中 如图
最后我们再窗体上输出”s"的值如图
这样程序就编写完了，然后运行一下程序，看结果如何，当我单击命令按钮（command1）时，最后前100个数累加的结果就已经从当前的窗体中显示出来了。
