Mega Code Archive
Create a copy of the queue, using the ToArray method and the constructor that accepts an IEnumerable(Of T)
Imports System
Imports System.Collections.Generic
Module Example
Sub Main
Dim numbers As New Queue(Of String)
numbers.Enqueue("one")
numbers.Enqueue("two")
numbers.Enqueue("three")
numbers.Enqueue("four")
numbers.Enqueue("five")
'
Dim queueCopy As New Queue(Of String)(numbers.ToArray())
End Sub
End Module