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

方法/步骤

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

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

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

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

Dim sum As Single

Dim i As Integer

For i = 1 To 100 Step 2

sum = sum + i

Next i

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

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

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

编辑于2018-03-29，内容仅供参考并受版权保护

经验备注

本文网址：https://www.5058.cn/article/b24f6c826ebf7f86bfe5da89.html