问题
填空题
在窗体中有一个名为(Command1的命令按钮,Click事件的代码如下:
Private Sub(20mnlan d1_Click()
f=0
For n=1 to 10 Step 2
f=f+n
Next n
Me!lb1.Caption=f
End Sub
单击命令按钮后,标签显示的结果是______。
答案
参考答案:Y
解析: 本题考查的是VBA编程基础、For…Next循环结构。循环语句For…Next能够重复执行程序代码区域特定次数,格式如下:
For循环变量=初值To终值[step步长]
循环体
[条件语句序列
Exit For
结束条件语句序列]
Next[循环变量]
本题通过For循环计算1到10中所有奇数的和,即n=1,每循环一次增加2:
第一次循环结果:n=1,f=f+n=0+1=1;
第二次循环结果:n=3,f=f+n=1+3=4;
第三次循环结果:n=5,f=f+n=4+5=9;
第四次循环结果:n=7,f=f+n=9+7=16;
第五次循环结果:n=9,f=f+n=16+9=25。