问题
单项选择题
在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：
Private Sub Command1_Click()
Dim i，j，x
For i=1 To 20 Step 2
x=0
For j-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
解析： 本题考查的是VBA编程基础以及循环嵌套结构。对于外层的i循环，因为其循环体的第1句“x=0”，就是将x置0，所以只需考虑其最后一次循环，最后一次循环时，i的值为19。此时，内循环j的初值为19，终值为20，步长为3，则其循环体只运行一次，即x的值只加了一个1。因此x的值为1。