Public Class Language

   Private m_sName As String
   Public ReadOnly Property Name As String
      Get
         Return m_sName
      End Get
   End Property

   Private m_sFilePath As String
   Public ReadOnly Property FilePath As String
      Get
         Return m_sFilePath
      End Get
   End Property

   Sub New(sName As String, sFilePath As String)
      m_sName = sName
      m_sFilePath = sFilePath
   End Sub

End Class