？挑战高手！如何实现一个先进先出的队列(具体内容内详）

Question

我觉得你可以定义一个对象集合，collection，可以在对象中记录向前和向后的key，然后在collection中进行对象操作

Answer 1

为什么，我曾经用数组模拟过定长的双向链，我觉得collection比数组更好用

Answer 2

Public t As New Collection
Dim intN As IntegerPrivate Sub Add(ByVal intTest As Integer)
    t.Add intTest
End SubPrivate Sub Command1_Click()
    t.Remove 1
    Debug.Print t(1)
End SubPrivate Sub Command2_Click()
    t.Add intN
    intN = intN + 1
End Sub
例子很简陋