问题
单项选择题
在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下。
Private Sub Command1_Click()
Dim i，j，x
For i=1 To 20 Step 2
x=0
For i=i To 20 Step 3
x=x+1
Next j
Next i
Text1.Value=Str(x)
End Sub
打开窗体运行后，单击命令按钮，文本框中显示的结果是( )。
A) 1
B) 7
C) 17
D) 400
答案
参考答案：A
解析： 事件代码中有两个For循环，第一个for循环“For i=1 To 20 step 2”变量i的初值为1，终值为20，步长为2，循环条件符合，执行语句“x=0”，为变量x赋值为0，从这里可以看出，无论循环执行多少次，在执行循环体时，x的值都将还原为0，通过这一点可知，最后一次循环的结果即为整个程序的运行值。再来看整个程序，第二个For循环“For i=i To 20 step 3”，初值为i，终值为20，步长为3，那么可以知道，当i=1时，第二个循环执行7次；当i=3时，第二个循环执行6次，依次类推，当i=19时，第一个循环最后一次执行，那么把i=19代入到第二个循环中：
当1=19时，j=19，x=0+1=1。
此时i=j+3=19+3=22，22＞20，循环条件不成立，循环结束。
至此，第一个For循环和第二个For循环都运行结束，所以x=1，通过语句“Text1.Value=Str(x)”将字符1显示在窗体的文本框中。所以本题答案为A)。