Public Function QueueRemove( _
ByRef rValue As Variant _
) As Boolean Assuming
Dim dqTemp As New Deque
dqTemp.QueueAdd 12
dqTemp.QueueAdd 23
Dim varTemp As Variant
Dim bResult As Boolean
for example
bResult = dqTemp.QueueRemove(varTemp)
leaves
bResult = True
varTemp = 12
and
bResult = dqTemp.QueueRemove(varTemp)
leaves
bResult = True
varTemp = 23See also: QueueAdd Subroutine
RemoveHead FunctionDefinition: QueueRemove = 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.