Imports System.Collections.Generic
Dim model as Model = New Model With
.position = "System Architect",
.start_date = "2011/04/25",
Dim anon = New With {.data = New List(Of Model) From {model}}
Dim json As String = JsonConvert.SerializeObject(anon, Formatting.Indented)
Public Property name As String
Public Property position As String
Public Property salary As String
Public Property start_date As String
Public Property office As String
Public Property extn As String