VB.NET Api JSON-adapted