Queue Collections Learn programming Visual Basic (VB.net)

Lesson:

Dynamic Memory Management


Exercise:

Queue Collections 8


Objetive:

Queue-Collections


Code:

Imports System
Imports System.Collections
Class Program
    Private Shared Sub Main()
        Dim depurando As Boolean = True
        Dim miCola As Queue = New Queue()
        miCola.Enqueue("Hola,")
        miCola.Enqueue("soy")
        miCola.Enqueue("yo")
        Dim cantidadCola As Integer = miCola.Count

        For i As Byte = 0 To cantidadCola - 1
            Console.WriteLine(miCola.Dequeue())
        Next

        If depurando Then Console.ReadLine()
    End Sub
End Class