Public Class Beryllium
    Public Const AtomicNumber As Byte = 4
    Public Const Symbol As String = "Be"
    Public Const Name As String = "Beryllium"
    Public Const AtomicMass As Double = 9.012182

    Public Const List = AtomicNumber & vbNewLine & Symbol & vbNewLine & Name & vbNewLine & AtomicMass 'This line
End Class

Public Shared ReadOnly List = AtomicNumber & vbNewLine & Symbol & vbNewLine & Name & vbNewLine & AtomicMass

Public Const Name As String = "Beryllium"

If (something = Name)...

If (something = "Beryllium")

Public ReadOnly Property List() As String
  Get
    Return AtomicNumber.ToString() & vbNewLine & Symbol & vbNewLine & Name & vbNewLine & AtomicMass
  End Get
End Property