nstance() As Long
   hInstance = m_hInst
End Property
Public Property Let hInstance(ByVal hInst As Long)
   m_hInst = hInst
End Property
Public Property Get AlphaLogoId() As Long
   AlphaLogoId = m_lAlphaLogoId
End Property
Public Property Let AlphaLogoId(ByVal lId As Long)
   m_lAlphaLogoId = lId
End Property
Public Property Get AlphaLogoFileName() As String
   AlphaLogoFileName = m_sAlphaLogoFileName
End Property
Public Property Let AlphaLogoFileName(ByVal sFileName As String)
   m_sAlphaLogoFileName = sF