Queue.Count : Queue « System.Collections « VB.Net by API

1. VB.Net by API
2. System.Collections
3. Queue

Queue.Count

  

Imports System
Imports System.Collections
Imports System.Collections.Specialized


Public Class MainClass
    
    Shared Sub Main(ByVal args As String())
        Dim m_Queue As New Queue

        m_Queue.Enqueue("Text")
        m_Queue.Enqueue("Text")
        m_Queue.Enqueue("Text")

        Dim txt As String = DirectCast(m_Queue.Dequeue(), String)
        Console.WriteLine(txt)

        For Each str As String In m_Queue.ToArray()
            Console.WriteLine(str)
        Next str

        Console.WriteLine(m_Queue.Count )
        
    End Sub
End Class

   
    
  

Related examples in the same category