给出下面程序: Private Sub Command1_Click() Dim x,y,z X=False For Each y In 2 If y.Text="Hello" Then

admin2009-02-13  30

问题 给出下面程序:    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循环

答案8

解析 For Each…Next的语法格式为:
   For Each element In group
      [statements]
      [Exit For]
      [statements]
    Next  [element]
   其中element用来反复装载group对象集合数组中的对象,直到遍历group数组中的所有对象。
转载请注明原文地址:https://jikaoti.com/ti/e8q0FFFM
0

最新回复(0)