在窗体上有一个命令按钮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
解析: 题目中使用了双重For循环,外循环中每循环一次,X的值都是从0开始,所以外循环中到最后一次循时,X的值是0。而内循环中的最后一次循环是j=20 to 20 step 3,所以此时内循环只循环一次,X的值为X=0+1=1。Str函数将数值转换成字符串。