Public Sub StackPush( _
ByVal vValue As Variant _
) Assuming
Dim dqTemp As New Deque
for example
dqTemp.StackPush 12
dqTemp.StackPush 23
Dim varOne As Variant
Dim varTwo As Variant
dqTemp.StackPop varOne
dqTemp.StackPop varTwo
leaves
varOne = 23
varTwo = 12See also: StackPop Function
AddHead Subroutine
Stack Class
Push SubroutinevValue: Value that will be inserted into the stack. vValue can be any type of Variant value (vbString, numeric, vbDate, vbObject, vbArray, etc.). AddHead vValuev1.3 BugFix: This Subroutine has been fixed to support the storage of Object and DataObject type Values.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.