Hello Kevin,
Thank you very much for your reply. Would it be possible to this without creating seperate classes for each node in the Link List?
Thank You
Gary
>Gary,
>
>The problem is in this method:
>
>> Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
>>
>> Dim oClass As New clsString
>> Dim oClass02 As New clsString
>> Dim oClass03 As New clsString
>>
>> oClass.strString = "1"
>>
>> Dim oLinkListNode As New LinkedListNode(Of clsString)(oClass)
>> Dim oLinkList As New LinkedList(Of clsString)
>>
>> oClass.strString = "2"
>> oLinkList.AddLast(oClass)
>>
>> oClass.strString = "3"
>> oLinkList.AddLast(oClass)
>>
>> oLinkList.AddFirst(oLinkListNode)
>>
>> DisplayLinkList(oLinkListNode)
>>
>> End Sub
>
>You are instantiating three different instances of clsString, but you are only using one of them (oClass). You need to change your code to:
>
>
> Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
>
> Dim oClass As New clsString
> Dim oClass02 As New clsString
> Dim oClass03 As New clsString
>
> oClass.strString = "1"
>
> Dim oLinkListNode As New LinkedListNode(Of clsString)(oClass)
> Dim oLinkList As New LinkedList(Of clsString)
>
> oClass02.strString = "2"
> oLinkList.AddLast(oClass02)
>
> oClass03.strString = "3"
> oLinkList.AddLast(oClass03)
>
> oLinkList.AddFirst(oLinkListNode)
>
> DisplayLinkList(oLinkListNode)
>
> End Sub
>