stringなどの参照型を格納するQueueの場合はnull
/Nothing
を格納することもできます。
Queueにnullを格納する(参照型の場合)
Imports System
Imports System.Collections.Generic
Class Sample
Shared Sub Main()
' String(参照型)のQueue
Dim q As New Queue(Of String)()
' NothingをEnqueueする
q.Enqueue(Nothing)
' Enqueueした内容をPeekする
If q.Peek() Is Nothing Then
Console.WriteLine("(Nothing)")
Else
Console.WriteLine(q.Peek())
End If
End Sub
End Class
実行結果
(Nothing)