Option Strict On
Imports System.Collections
Public Module modMain
Public Sub Main()
Dim waitingPassengers As New Queue
Console.WriteLine(waitingPassengers.Count)
waitingPassengers.Enqueue("asdf")
Console.WriteLine(waitingPassengers.Peek())
Console.WriteLine(waitingPassengers.Count)
Console.WriteLine(waitingPassengers.Dequeue())
End Sub
End Module
|