Public Function StackPop( _ ByRef rValue As Variant _ ) As Boolean
Assuming Dim dqTemp As New Deque dqTemp.StackPush 12 dqTemp.StackPush 23 Dim varTemp As Variant Dim bResult As Variant for example bResult = dqTemp.StackPop(varTemp) leaves bResult = True varTemp = 23 and bResult = dqTemp.StackPop(varTemp) leaves bResult = True varTemp = 12See also:
StackPush Subroutine RemoveHead Function Stack Class Pop FunctionrValue: Value at the top of the Stack is assigned into variable rValue. rValue must be compatible with the value that is being retrieved.
StackPop = RemoveHead(rValue)v1.3 BugFix: This function has been changed to return the retrieved value via an argument instead of via its return value. This is so that you do not have to know in advance whether the function will return an object reference or an ordinary value. Also, this Function has been fixed to support the retrieval of Object and DataObject type Values.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.