永顺一中2017高考金榜:for each next 怎么用啊
来源:百度文库 编辑:中科新闻网 时间:2024/05/05 20:16:00
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