VbzCart/docs/archive/code/VBA/clsPkgCount: Difference between revisions

From Woozle Writes Code
< VbzCart‎ | docs‎ | archive‎ | code‎ | VBA
Jump to navigation Jump to search
imported>Woozle
mNo edit summary
m (Woozle moved page VbzCart/VbzCart/archive/code/VBA/clsPkgCount to VbzCart/docs/archive/code/VBA/clsPkgCount without leaving a redirect: correct naming (was no way to import directly to this name))
 
(No difference)

Latest revision as of 01:53, 25 February 2024

' CLASS: clsPkgCount

Option Compare Database
Option Explicit

Public Checked As Long
Public Unchecked As Long
Public PulledPkg As Long    ' pulled packages (merch to be shipped)
Public PulledMsg As Long    ' pulled messages (no merch; ok to send even if pulled)
Public Sub Clear()
    Me.Checked = 0
    Me.Unchecked = 0
    Me.PulledPkg = 0
    Me.PulledMsg = 0
End Sub
Public Sub IncChecked()
    Me.Checked = Me.Checked + 1
End Sub
Public Sub IncUnchecked()
    Me.Unchecked = Me.Unchecked + 1
End Sub
Public Sub IncPulledPkg()
    Me.PulledPkg = Me.PulledPkg + 1
End Sub
Public Sub IncPulledMsg()
    Me.PulledMsg = Me.PulledMsg + 1
End Sub