Demetrio Cassarino
25 lines
540 B
VB.net
25 lines
540 B
VB.net
Module MapV
|
|
|
|
Private m_refStrategyProductionV As StrategyProductionV
|
|
|
|
#Region "Get"
|
|
|
|
Public ReadOnly Property refStrategyProductionV As StrategyProductionV
|
|
Get
|
|
Return m_refStrategyProductionV
|
|
End Get
|
|
End Property
|
|
|
|
#End Region ' Get
|
|
|
|
#Region "Set"
|
|
|
|
Friend Function SetRefStrategyProductionV(StrategyProductionV As StrategyProductionV) As Boolean
|
|
m_refStrategyProductionV = StrategyProductionV
|
|
Return Not IsNothing(m_refStrategyProductionV)
|
|
End Function
|
|
|
|
#End Region ' Set
|
|
|
|
End Module
|