UC知道VB里的程序问题
来源：百度知道 编辑：UC知道 时间：2024/05/16 16:09:31
计算 1 到 100 间所有奇数的和。
只需将上例中的“开始”按钮的循环程序加上步长值即可。代码如下：
Private Sub CmdStart_Click()
x = 0
For y = 1 To 100 Step 2
x = x + y
Next y
LblShow.Caption = "最后的结果是：" & x
End Sub
谁能给我讲讲段代码的意思啊 特别是那个step
只需将上例中的“开始”按钮的循环程序加上步长值即可。代码如下：
Private Sub CmdStart_Click()
x = 0
For y = 1 To 100 Step 2
x = x + y
Next y
LblShow.Caption = "最后的结果是：" & x
End Sub
谁能给我讲讲段代码的意思啊 特别是那个step
Private Sub CmdStart_Click() '此过程是单击CmdStart这个控件的时候开始执行的。
x = 0 'x变量的值为0
For y = 1 To 100 Step 2 '开始一个For循环，循环变量是y，初始值是1，终止是100，步长是2，循环就是循环变量从1开始，每循环一次，增加2，然后到达100或大于100则退出循环，执行Next后面的
x = x + y 'x这个变量的值=原x的变量值+现在y的值
'因为步长是2，而且是从1开始，所以循环变量一顶是奇数。
Next y '下一轮循环
LblShow.Caption = "最后的结果是：" & x 'LblShow显示“最后的结果是：结果”
End Sub'过程结束
看我答得这么辛苦，给点分吧
首先X=0，在Y从1到100，每次Y自加2，执行X = X+Y
STEP 2是指Y每循环一次自加2
Step 2 就是y每次加2，不加step的话默认为1