[单项选择题] 给出下面程序:
Private Sub Command1_Click()
Dim x,y,z
X=False
For Each y In 2
If y.Text="Hello" Then
x=True
Exit For
End If
Next y
End Sub
下面描述正确的是
A.退出For Each…Next循环的条件是x=True
B.退出For Each…Next循环的条件是x=False
C.程序检查y对象的Text属性,等于“”时退出For Each…Next循环
D.程序逐一查找在z中的对象,不确切并判断其Text属性,文本框中的内容等于“Hello”时退出For Each…Next循环
参考答案:
D解析:[分析]: For Each…Next的语法格式为: For Each element In group [statements] [Exit For] [statements] Next [element] 其中element用来反复装载group对象集合数组中的对象,直到遍历group数组中的所有对象。问题解析:
解析无

![[单项选择题] 给出下面程序: Private Sub Command1_Click()Dim x,y,zX=FalseFor Each y In 2 If y.Text="Hello&q [单项选择题] 给出下面程序: Private Sub Command1_Click()Dim x,y,zX=FalseFor Each y In 2 If y.Text="Hello&q](http://www.mshxw.com/aiimages/31/258491.png)
