DotNet: Como usar Queue.vb

Module Module1
    Sub Main()
        Console.WriteLine("----------------- Exemplo com Queue -----------------")
        Dim queueList As New Queue
        queueList.Enqueue("Item1")
        queueList.Enqueue("Item2")
        queueList.Enqueue("Item3")
        queueList.Enqueue("Item4")
        Console.WriteLine("* Queue: O primeiro a ser inserido é o primeiro a sair.")
        Console.WriteLine("* O primeiro da fila é o -> " & queueList.Peek)
        Console.WriteLine("* O primeiro da fila foi pego e removido -> " & queueList.Dequeue)
        Console.WriteLine("* Agora o primeiro da fila é o -> " & queueList.Peek)

        Console.WriteLine("* Atualmente contem os itens: ")
        For Each item As String In queueList
            Console.WriteLine(item)
        Next

        Console.ReadLine()
    End Sub
End Module