How to print out nice JSON format in 'Message Box' in Activities

Nothing come out
JArrayVariable.Select(Function(s) s(“Name”).ToString)

Please show me an example of code.