Module _20190422

    Sub Main()

        Select Case Console.ReadLine()
            Case 25
                Console.WriteLine("Christmas")
            Case 24
                Console.WriteLine("Christmas Eve")
            Case 23
                Console.WriteLine("Christmas Eve Eve")
            Case 22
                Console.WriteLine("Christmas Eve Eve Eve")
        End Select

    End Sub

End Module