Click here to Skip to main content

.NET Framework

 
QuestionEvent Handling between Threads PinmemberAeroClassics19-Feb-13 12:37 
AnswerRe: Event Handling between Threads PinmemberGerry Schmitz19-Feb-13 20:25 
GeneralRe: Event Handling between Threads PinmemberAeroClassics20-Feb-13 5:45 
QuestionWays of implenting IEnumerable in VB PinmemberMike-MadBadger19-Feb-13 12:10 
OK, I cannot get my head around the whether there is a difference between the 'classic' (perhaps long winded) way of doing it, multiple classes and the 'new' Yield route to (apparently) the same end.
 
I can understand the classic route (I think), see the code below.
Yield confuses the heck out of me, if I understand it correctly then it's absolutely genius, I get the idea of a state machine (I think) and logically it sort of makes sense but I am not at all confident.
 
Can it possibly be this simple? You just make that one method as simple or complex as necessary for your situation?
(Warning, silly example since arrays can already be enumerated, but it's easy to demo)
Public Class YieldExample
    Implements IEnumerable
 
    Private _Thing As Double()
 
    Public Iterator Function GetEnumerator() As IEnumerator Implements IEnumerable.GetEnumerator
        If IsNothing(Me._Thing) Then
            Throw New InvalidOperationException()
        End If
 
        For Index As Integer = 0 To Me._Thing.GetUpperBound(0)
            Yield Me._Thing(Index)
        Next
    End Function
 
End Class
What I understand to be the 'old way'.
Public Class ExampleEnumerable
    Implements IEnumerable(Of Double)
 
    Private _Thing As Double()
 
    Public Function GetEnumerator() As IEnumerator(Of Double) Implements IEnumerable(Of Double).GetEnumerator
        Return New ExampleEnumerator(Me._Thing)
    End Function
 
    Public Function GetEnumerator1() As IEnumerator Implements IEnumerable.GetEnumerator
        Return Me.GetEnumerator
    End Function
End Class
 

 
Public Class ExampleEnumerator
    Implements IEnumerator(Of Double)
 
    Private _Thing As Double()
    Private _Index As Integer
    Private _curItem As Double
 
    Public Sub New(ByVal Thing As Double())
        Me._Thing = Thing
        Me._Index = -1
        Me._curItem = Nothing
    End Sub
 
    Public ReadOnly Property Current As Double Implements IEnumerator(Of Double).Current
        Get
            If IsNothing(Me._curItem) Then
                Throw New InvalidOperationException()
            End If
            Return Me._curItem
        End Get
    End Property
 
    Public ReadOnly Property Current1 As Object Implements IEnumerator.Current
        Get
            Return Me.Current
        End Get
    End Property
 
    Public Function MoveNext() As Boolean Implements IEnumerator.MoveNext
        'If we are already at the end then return false
        If Me._Index = Me._Thing.GetUpperBound(0) Then
            Return False
        End If
        'Otherwise move to the next position in the array
        Me._Index += 1
        Me._curItem = Me._Thing(Me._Index)
        Return True
    End Function
 
    Public Sub Reset() Implements IEnumerator.Reset
        Me._Index = -1
        Me._curItem = Nothing
    End Sub
 
    #Region "IDisposable Support"
 
End Class
Thanks,
Mike
AnswerRe: Ways of implenting IEnumerable in VB PinmemberMicroVirus13-Mar-13 12:56 
GeneralRe: Ways of implenting IEnumerable in VB PinmemberMike-MadBadger13-Mar-13 22:44 
Questionhow to manage exicution code Pinmembernanhesab18-Feb-13 1:58 
AnswerRe: how to manage exicution code PinmvpEddy Vluggen18-Feb-13 2:01 
AnswerRe: how to manage exicution code PinmemberSuper Lloyd18-Feb-13 2:33 
AnswerRe: how to manage exicution code PinmvpSandeep Mewara18-Feb-13 4:13 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.


Advertise | Privacy | Mobile
Web03 | 2.8.150327.1 | Last Updated 31 Mar 2015
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid