详细讲述VB.NET IEnumerator接口

经过长时间学习VB.NET IEnumerator接口，于是和大家分享一下，看完本文你肯定有不少收获，希望本文能教会你更多东西。在面向对象的设计中，经常会用到有类似父子关系的这个对象，比如在我现在的一个项目中，有订单对象，在一个订单下又包含多个产品，这时我就想用Iterator模式来封装订单下的产品，在dot Net中的IEnumerator接口就是用来实现迭代的，来支持dot Net中的for each的操作。

我们拥有十多年网页设计和网站建设经验，从网站策划到网站制作，我们的网页设计师为您提供的解决方案。为企业提供成都网站建设、成都网站制作、微信开发、微信平台小程序开发、移动网站建设、H5网站设计、等业务。无论您有什么样的网站设计或者设计方案要求，我们都将富于创造性的提供专业设计服务并满足您的需求。

要实现VB.NET IEnumerator接口，需在实现以下几个函数来支持VB.NET IEnumerator接口的操作

 
 
   
  
  Overridable ReadOnly Property Current() As Object    
  
  'Current用于在迭代过程中得到当前的对象    
  
  Public Overridable Function MoveNext() As Boolean

MoveNext用于在迭代过程中将迭代指针指向下一个对象，初始是迭代指针指向集合的开始（在第一个节点之前的位置），一旦越过集合的结尾，在调用 Reset 之前，对 MoveNext 的后续调用返回 false。

 
 
   
  
  Overridable Sub Reset()

#t#将枚举数设置为其初始位置，该位置位于集合中第一个元素之前。

只要集合保持不变，枚举数就将保持有效。如果对集合进行了更改（例如添加、修改或删除元素），则该枚举数将失效且不可恢复，并且下一次对 MoveNext 或 Reset 的调用将引发 InvalidOperationException。

下面是一个具体的实现VB.NET IEnumerator接口的对像

 
 
   
  
  Imports System.Collections    
  
     
  
  '在此实际实现的是System.Collections.IEnumerable接口，
IteratorProduct 用此接口来向使用者提供对IEnumerator接口的操作。    
  
     
  
  Public Class IteratorProduct : Implements System.Collections.IEnumerable    
  
  Private Products As Collection '用Collection在存订单中的所有产品    
  
  Private item As Integer = -1    
  
     
  
  Public Sub New()    
  
  Products = New Collection    
  
  Products.Add("xh") '这只是为了测试方便，将加入产品的内容直接写在这了    
  
  Products.Add("lj")    
  
  Products.Add("qd")    
  
  End Sub    
  
     
  
  Overridable ReadOnly Property Current() As Object    
  
  Get    
  
  Return Products(item)    
  
  End Get    
  
  End Property    
  
     
  
  Public Overridable Function MoveNext() As Boolean    
  
  item += 1    
  
  End Function    
  
     
  
  Overridable Sub Reset()    
  
  item = -1    
  
  End Sub    
  
     
  
  '返回迭代对像给使用者    
  
     
  
  Overridable Function GetEnumerator() 
As IEnumerator Implements IEnumerable.GetEnumerator    
  
  Return Me.Products.GetEnumerator    
  
  End Function    
  
     
  
  End Class    
  
     
  
  Private Sub Page_Load(ByVal sender As System.Object, 
ByVal e As System.EventArgs) Handles MyBase.Load    
  
  Dim Products As IteratorProduct    
  
  Products = New IteratorProduct    
  
  Dim ProductName As String    
  
  For Each ProductName In Products    
  
  Response.Write(ProductName)    
  
  Response.Write("
")    
  
  Next    
  
  End Sub

网站名称：详细讲述VB.NET IEnumerator接口
分享路径：http://www.gawzjz.com/qtweb2/news37/17437.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：创新互联

猜你还喜欢下面的内容