S
SeekingMoSkills
I have create classes with the Let and Get functions and now I would like to
use these functions to store and retrieve data in the class which will then
be put into a collection.
Here is the class functions:
Private pBusPart As Double
Private pStartTime As Date
Private pIndex As Integer
''''''''''''''''''''''
' BusPart property
''''''''''''''''''''''
Public Property Get BusPart() As Double
BusPart = pBusPart
End Property
Public Property Let BusPart(Value As Double)
pBusPart = Value
End Property
''''''''''''''''''''''
' StartTime property
''''''''''''''''''''''
Public Property Get StartTime() As Date
StartTime = pStartTime
End Property
Public Property Let StartTime(Value As Date)
StartTime = Value
End Property
''''''''''''''''''''''
' Index property
''''''''''''''''''''''
Public Property Get Index() As Integer
Index = pIndex
End Property
Public Property Let Index(Value As Integer)
pIndex = Index
End Property
use these functions to store and retrieve data in the class which will then
be put into a collection.
Here is the class functions:
Private pBusPart As Double
Private pStartTime As Date
Private pIndex As Integer
''''''''''''''''''''''
' BusPart property
''''''''''''''''''''''
Public Property Get BusPart() As Double
BusPart = pBusPart
End Property
Public Property Let BusPart(Value As Double)
pBusPart = Value
End Property
''''''''''''''''''''''
' StartTime property
''''''''''''''''''''''
Public Property Get StartTime() As Date
StartTime = pStartTime
End Property
Public Property Let StartTime(Value As Date)
StartTime = Value
End Property
''''''''''''''''''''''
' Index property
''''''''''''''''''''''
Public Property Get Index() As Integer
Index = pIndex
End Property
Public Property Let Index(Value As Integer)
pIndex = Index
End Property