vb循环语句计算奇偶数累加和的方法

1、首先启动vb6，从新建工程对话框中选择标准exe文件，进入窗体对话框。

2、选择form1，设置borderstyle为4-fixed，设置startupposition为屏幕中心，并调整窗体的大小。

3、在属性窗口中找到并点击font ，设置字体为仿宋，字号为初号。

4、双击窗体进入代码编辑区域，过程设置为click，接着输入代码内容，代码如下：

Dim sum As Single

Dim i As Integer

For i = 1 To 100 Step 2

sum = sum + i

Next i

5、返回到窗体，点击工具栏中的启动按钮，接着点击窗体就可以出现结果了。

6、如果要求偶数和，只需要修改变量i的初值为2，接着启动查看结果即可。

7、在实际中要根据自己的实际情况修改初值和终值，求n以内的奇偶数和就可以了。