在窗体上有一个命令按钮Commandl和一个文本框Text1，编写事件代码如下 Private Sub Commandl_Click() Dim i，j,x For i=1 To 20 sep 2 x=0 Forj=

admin2017-03-31 34

问题在窗体上有一个命令按钮Commandl和一个文本框Text1，编写事件代码如下
Private Sub Commandl_Click()
Dim i，j,x
For i=1 To 20 sep 2
x=0
Forj=i To 20 step 3
x=x+1
Nextj
Next i
Text1．Value=Str(x)
End Sub
打开窗体运行后，单击命令按钮，文本框中显示的结果是

选项 A、1
B、7
C、17
D、400

答案A

解析外循环每次循环都将x重置为0，所以只看外循环的最后一次即i=20时，此时内循环i=i=20开始以步长为2开始递增，递增一次执行x=x+1=0+1=1后便结束循环，所以最后文本框显示的结果为1。

转载请注明原文地址:https://kaotiyun.com/show/kvgp777K

本试题收录于：二级Access题库NCRE全国计算机二级分类