[vb.net] JSON Example

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim jo As Object = New With {Key .list = {"foo", "bar"}, Key .data = "string"}

        RichTextBox1.Text = JsonConvert.SerializeObject(jo)

    End Sub