Public Class AppInfo
    Private Shared m_stdImagePath as string
    Public Shared Function Init() as boolean
        m_stdImagePath = Application.StartUpPath & "\Covers\nopic.jpg"
    End Function
 
    Public ReadOnly Property stdImagePath as string
        Get
            return m_stdImagePath
        End Get
    End Property
End Class

AppInfo.Init
Debug.Writeline(AppInfo.stdImagePath)