在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令

问题单项选择题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For i=0 To 50
i=i+3
n=n+1
if i＞10 Then Exit For
Next
Text1.Text=Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是

A．2

B．3

C．4

D．5

答案

参考答案：B

解析：本题的循环控制变量i除去会按照For语句的规则按照默认步长1增长以外。在循环体内还做了相应的操作来改变其值。当i为0时，执行第一次循环，通过循环体中的i=i+3，使得变量i=3，同时n的值变为1；本次循环结束后，i变量加上默认步长1，i=4，进行第二次循环，再执行i=i+3，i=7，n=2；第二次循环结束后，i变量再次加上默认步长1，i=8，进行第三次循环时，i=i+3，i=11，n=3．由于此时i＞10条件成立，执行Exit For语句退出循环，再执行Text1.Text=Str(n)，由于此时n=3，所以显示在文本框的值为3，选项B为正确答案。