Public Function PopMulti( _ ParamArray rValues() As Variant _ ) As Integer
Assuming Dim intCount As Integer Dim varOne As Variant Dim varTwo As Variant stkTemp.StringView() = "(Top) 4444, 333, 22, 1 (Bottom)" for example intCount = stkTemp.PopMulti(varOne, varTwo) leaves intCount = 2 varOne = 4444 varTwo = 333 stkTemp.StringView() = "(Top) 22, 1 (Bottom)"See also:
Pop Function Drop Function RemoveAll Subroutine PushMulti SubroutinerValues: One or more arguments that will receive the values popped off the stack. The arguments can be any type of Variant value (vbString, numeric, vbDate, vbObject, vbArray, etc.) as long as they are compatible with the type of value being assigned into them.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.