Cara Parsing Json Kedalam Bentuk Object Di VB.NET

1. Install Newtonsoft.Json
Silahkan kalian masuk ke Nuget Package Manager di visual studio kalian dengan cara klik Project di menu bar kemudian klik Manage Nuget Packages. Kemudian di tab browser kalian cari Newtonsoft.Json dan silahkan Install, seperti gambar berikut ini2. Buat Sebuah Data Dengan Format Json
Disini kita akan menggunakan json data dari reqres.in untuk mengetest aplikasi pada sisi front end. Url seperti berikut.

https://reqres.in/api/users?page=1

3. Membuat Object Class Vb.net dari Json Format
Disini kita tidak akan membuatnya secara manual, tapi kita akan menggenerate nya melalui jsonutils.com. Caranya gampang, tinggal kalian pilih bahasa vb.net, selanjutnya dibagian kotak Json Text or Url kalian paste Json datanya, dan klik submit. Hasilnya tinggal kalian copy.4. Cara Memparsing Data Dari Json Menjadi Bentuk Object dan Sebaliknya
Sebagai contoh, disini saya sudah membuat sebuah program Console App. Source codeny sebagai berikut.

Imports System.IO
Imports System.Net
Imports Newtonsoft.Json

Module ModuleMain
    Sub Main()
        'Request Data Menggunakan HttpWebRequest
        Dim request As HttpWebRequest = DirectCast(WebRequest.Create("http://reqres.in/api/users?page=1"), HttpWebRequest)
        Dim response As HttpWebResponse = DirectCast(request.GetResponse(), HttpWebResponse)
        Dim reader As StreamReader = New StreamReader(response.GetResponseStream())
        Dim JsonString As String = reader.ReadToEnd()
        '--------------------------------------------
        'Cara memparsing dari Json ke Object Data
        Dim objData As Example = JsonConvert.DeserializeObject(Of Example)(JsonString)
        Console.WriteLine("--------Ini Hasil Parsing dari Json ke Object Data-----------")
        For Each datum As Datum In objData.data
            Console.WriteLine("Id :" & datum.id & ",Email :" & datum.email & ", First Name :" & datum.first_name & ", Last Name :" & datum.last_name)
        Next

        'Cara mengkonversi Object Data ke Json Format
        Dim json = JsonConvert.SerializeObject(objData)
        Console.WriteLine("-----------Ini Hasil Konversi dari Data ke Json Format---------")
        Console.WriteLine(json)
        Console.Read()
    End Sub

End Module

Jika kita running maka hasilnya akan seperti gambar berikut ini