天威宽带如何:for each next 怎么用啊
来源:百度文库 编辑:杭州交通信息网 时间:2024/05/27 11:11:59
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