在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如

问题：

[单选] 在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：

Private Sub Commandl一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．Textl．Value=Str(x)

End Sub

打开窗体运行后，单击命令按钮，文本框中显示的结果是（　　）。

A . 1

B . 7

C . 17

D . 400

A

A。【解析】由于外层循环体中有语句x=0所以无论内循环结束时X为多少，它都将被重新赋值0，所以只有最后一次i=19，j=19此时x值为l，由于i的步长为2，21不符循环条件，退出整个循环。故文本框中的结果为l。