茬窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim iAs Integer,nAs Integer For i=0 To 50 i=i+3:

admin2015-12-09  32

问题 茬窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:
Private Sub Commandl_Click()
Dim iAs Integer,nAs Integer
For i=0 To 50
i=i+3:n=n+1
Ifi>10 Then Exit For
Next
Text1.Text=Str(n)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是

选项 A、2
B、3  
C、4
D、5

答案B

解析 语句ExitFor的作用是退出当前For循环。本题中For循环语句的循环变量i不仅在执行到Next语句时后自动加1,而且在每次执行循环体中的i=i+3语句时,还会加3。当第1次进入循环体时i=0、n=0;当第2次进入循环体时i=4、n=1;当第3次进入循环体时i=8、n=2,此时当执行i=i+3和n=n+1语句后,i=11、n=3,If语句的条件表达式i>10为真,将退出循环,故文本框中显示的值为3。
转载请注明原文地址:https://jikaoti.com/ti/qEJ0FFFM
0

最新回复(0)