Vb.net 从API获取Json并迭代结果

所以我觉得问一个简单的问题很愚蠢，但我对.NET不是很熟悉，我已经用谷歌搜索了一段时间

我希望从web API中获取数据，并能够对其进行迭代。数据如下所示

[
   {"id":"5", "date":"01-01-2014"},
   {"id":"90", "date":"05-01-2013"}

]

到目前为止，我得到的是：

 Private Sub newGetData()
    Dim request As HttpWebRequest
    Dim response As HttpWebResponse = Nothing
    Dim reader As StreamReader

    Try

        request = DirectCast(WebRequest.Create("http://somesite.com"), HttpWebRequest)

        response = DirectCast(request.GetResponse(), HttpWebResponse)
        reader = New StreamReader(response.GetResponseStream())

        Dim rawresp As String
        rawresp = reader.ReadToEnd()

        Dim jResults As JObject = JObject.Parse(rawresp)

        Dim results As List(Of JToken) = jResults.Children().ToList
        For Each item As JProperty In results
            item.CreateReader()
            MsgBox(item.name)
        Next


        'usernameTextbox.text = jResults("name").ToString()
        'placenameTextbox.text = jResults("place")("name").ToString()

    Catch ex As Exception
        MsgBox(ex.ToString)
    Finally
        If Not response Is Nothing Then response.Close()

    End Try
End Sub

我试过很多方法，但在循环中总是失败。我该怎么做呢

编辑：此文件的错误消息

Newtonsoft.Json.JsonReaderException: Error reading JObject from JsonReader. Current JsonReader   item is not an object: StartArray. Path '', line 1, position 1.
 at Newtonsoft.Json.Linq.JObject.Load(JsonReader reader)
 at Newtonsoft.Json.Linq.JObject.Parse(String json)
 at Forecasting.Form1.newGetData() in 

---

失败，出现什么错误消息？@tolanj我已将其添加到问题中您的JSON回复格式不正确。我看到一个包含JSON对象的数组，但不是JSON对象本身。我想您可以通过添加{“results”：}然后读取JObject.parse方法来包装它。。。