Mega Code Archive
Move the first node to be the last node
<![CDATA[
Imports System
Imports System.Text
Imports System.Collections.Generic
Public Class Example
Public Shared Sub Main()
Dim words() As String = {"the", "fox", "jumped", "over", "the", "dog"}
Dim sentence As New LinkedList(Of String)(words)
Dim mark1 As LinkedListNode(Of String) = sentence.First
sentence.RemoveFirst()
sentence.AddLast(mark1)
Display(sentence)
End Sub
Private Shared Sub Display(ByVal words As LinkedList(Of String))
For Each word As String In words
Console.Write((word + " "))
Next
End Sub
End Class
]]>