1、首先启动vb6，执行文件-新建工程命令，新建一个标准exe文件。
2、调整窗体的大小，在窗体中直接双击窗体进入代码区域。
3、对象设置为form，过程为click，将光标定位到输入区域。
4、接着输入代码，切换到英文状态下输入以下代码。
Dim s, i As Integer
s = 0
i = 1
Do
s = s + i
i = i + 1
Loop Until i = 101
Print "s="; s
5、点击工具栏中的启动按钮，点击窗体查看结果。
6、如果要计算其他连续数据的和的话，只需要修改结束条件即可，依次将窗体和工程保存在指定位置上即可。
