vbAccelerator - Contents of code file: IStack.cls
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
END
Attribute VB_Name = "IStack"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Option Explicit
' IStack
' Bruce McKinney from Hardcore Visual Basic
' - modified SPM: just store a string to make
' code simple
Public Sub Push(sArg As String)
End Sub
Public Function Pop() As String
End Function
Public Property Get Count() As Long
End Property
|