Option Strict On

Imports System

Imports System.IO

Imports System.Collections.Generic

Imports Newtonsoft.Json

Imports Newtonsoft.Json.Serialization

Imports Newtonsoft.Json.Converters

Imports Newtonsoft.Json.Linq

Public Module Module1

​

    Public Sub Main()

       'Here I am reading all text from the json file to "strJsonText" and then the below line throws 'exception

        Dim strJsonText As String

        strJsonText = "{    ""Name1"": ""Value1"",    ""Name2"": ""Value2"",      ""Array1"":[""a"", ""b"", ""c"", ""d""]}"

        Dim classDocs = JsonConvert.DeserializeObject(Of Test)(strJsonText)

        Console.WriteLine(classDocs.Array1(0))

    End Sub

​

End Module

​

​

Public Class Test

    Public Property Name1 As String

    Public Property Name2 As String

    Public Property Array1 As String()

End Class

​