防护胶条:for each next 怎么用啊
来源:百度文库 编辑:神马品牌网 时间:2024/05/16 17:06:58
Dim Found As Boolean = False
Dim MyCollection As New Collection
For Each MyObject As Object In MyCollection If CStr(MyObject.Text) = "Hello" Then
Found = True
Exit For
End If
Next