浅析VB For Each.Next语句

本文向大家介绍VB For Each.Next语句，可能好多人还不了解VB For Each.Next语句，没有关系，看完本文你肯定有不少收获，希望本文能教会你更多东西。

VB For Each.Next语句在数组中的使用：

VB For Each.Next语句好像只是为二种数据类型专门度身定做的，其一就是集合，另外一个就是数组了。通过VB For Each.Next语句，可以十分方便的访问数组中的任一元素。请仔细分析一下下列代码：

 
 
 

  
  
  
Dim arrString ( 2 ) As String = {"星期一","星期二","星期三"}  
  
  
  
Dim Temp As String  
  
  
  
For Each Temp In arrString  
  
  
  
If Temp = "星期三" Then  
  
  
  
MsgBox ( "在数组中寻找到""星期三""字符串")  
  
  
  
Exit For  
  
  
  
'退出For Each …. Next语句  
  
  
  
End If  
  
  
  
Next 
 
 
 

上面代码的功能是通过VB For Each.Next语句访问arrString数组中各元素，如果发现有元素为字符串“星期三”，则弹出提示框，并退出循环。

同样用For … Next语句也能够实现上面同样的功能，只是感觉有点不专业，并且有点繁琐，下面代码是用For … Next语句实现上面VB For Each.Next语句同等功能的代码：

 
 
 

  
  
  
Dim i As Integer  
  
  
  
For i = 0 To myString.Length - 1  
  
  
  
If arrString ( i ) = "星期三" Then  
  
  
  
MsgBox ( "在数组中寻找到""星期三""字符串" )  
  
  
  
Exit For  
  
  
  
End If  
  
  
  
Next 
 
 
 

【编辑推荐】

1. VB.NET重新申明数组简介
2. 简单描述VB.NET申明数组
3. 概括VB.NET窗体编程模式
4. 详解VB6.0和VB.NET窗体的区别
5. VB.NET GroupBox控件学习经验