Mega Code Archive

 

Categories / VB.Net Tutorial / Collections

 

Queue

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 0 asdf 1 asdf