Files
egtbeamwall/EgtBEAMWALL.Optimizer/Utility/MapV.vb
T
Demetrio Cassarino 75340d15cf -correzione merge
2026-06-18 10:26:31 +02:00

37 lines
813 B
VB.net

Module MapV
Private m_refSplashScreenV As SplashScreenV
Private m_refPDFEditorV As PDFEditorV
#Region "Get"
Public ReadOnly Property refSplashScreenV As SplashScreenV
Get
Return m_refSplashScreenV
End Get
End Property
Public ReadOnly Property refPDFEditorV As PDFEditorV
Get
Return m_refPDFEditorV
End Get
End Property
#End Region ' Get
#Region "Set"
Friend Function SetRefSplashScreenV(SplashScreenV As SplashScreenV) As Boolean
m_refSplashScreenV = SplashScreenV
Return Not IsNothing(m_refSplashScreenV)
End Function
Friend Function SetRefPDFEditorV(PDFEditorV As PDFEditorV) As Boolean
m_refPDFEditorV = PDFEditorV
Return Not IsNothing(m_refPDFEditorV)
End Function
#End Region ' Set
End Module