16,549
社区成员
发帖
与我相关
我的任务
分享
Dim q As New Queue(Of Byte)
q.Enqueue(1) '插入队列
Dim b As Byte = q.Dequeue() '从队列取数据
b = q.Peek() '取数据不删除队列中数据
'Declaration
<SerializableAttribute> _
<ComVisibleAttribute(False)> _
Public Class Queue(Of T) _
Implements IEnumerable(Of T), ICollection, IEnumerable