16
1
Option Strict On
2
Imports System
3
Imports System.Collections.Generic
4
Public Module Module1
5
Public Sub Main()
6
'Declare a Queue(Of String) that will represent a line of customers
7
Dim line As Queue(Of String) = New Queue(Of String)
8
9
'Fill in the line
10
line.Enqueue("David")
11
line.Enqueue("Michael")
12
line.Enqueue("Stephen")
13
14
Console.WriteLine(line.Dequeue())
15
End Sub
16
End Module
Cached Result