Imports System
Imports System.Collections
Public Class Program
Public Shared queue As Queue
Public Shared Sub PrintQueue()
For Each obj As Object In queue
Console.Write("{0} ", obj)
Next
End Sub
Public Shared Sub Main()
queue = New Queue()
queue.Enqueue(4)
queue.Enqueue(5)
PrintQueue()
queue.Enqueue(6)
queue.Enqueue(1)
queue.Enqueue(9)
Console.WriteLine()
PrintQueue()
End Sub
End Class
' run:
'
' 4 5
' 4 5 6 1 9
'