A-A+
给出下面程序： Private Sub Command1_Click() Dim x y z
问题详情
给出下面程序： 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
解析：ForEach…Next的语法格式为：ForEachelementIngroup[statements][ExitFor][statements]Next[element]其中element用来反复装载group对象集合数组中的对象，直到遍历group数组中的所有对象。
