VbzCart/docs/archive/code/VBA/clsPkgCount: Difference between revisions
Jump to navigation
Jump to search
imported>Woozle (Created page with "<VB> ' CLASS: clsPkgCount Option Compare Database Option Explicit Public Checked As Long Public Unchecked As Long Public PulledPkg As Long ' pulled packages (merch to be ...") |
imported>Woozle m (Woozle moved page VbzCart/code/VBA/clsPkgCount to VbzCart/archive/code/VBA/clsPkgCount) |
(No difference)
|
Revision as of 02:09, 19 December 2014
<VB> ' 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 </VB>