Visual Basic и веб-запрос Json.net

По сути, я пытаюсь сделать программу, которая выводит информацию об игре для League of Legends... используя API для извлечения данных. как это работает: вы ищете там имя пользователя, и оно возвращает целое число, связанное с этой учетной записью, затем вы используете это целое число для поиска всей информации об этой учетной записи, уровне учетной записи EG, выигрышах, поражениях и т. д. Я столкнулся с проблема, которую я не могу понять. Пожалуйста, не то, что я очень новичок в Json.net, поэтому у меня мало опыта работы с ним. Ниже показано, как находится поиск идентификатора пользователя. Первый раздел - это Имя пользователя минус любые пробелы в имени, затем идет идентификатор, который является необходимой мне информацией.

{"chucknoland":{"id":273746,"name":"Chuck Noland","profileIconId":662,"summonerLevel":30,"revisionDate":1434821021000}}

Я должен неправильно объявлять переменные, чтобы получить данные, так как все, что я делаю, возвращает 0.

это следующий класс, в котором я должен хранить идентификатор

    Public Class ID
    Public Shared id As Integer
    Public Shared name As String
End Class

Глядя на предыдущий пример, показанный здесь Простой рабочий пример json.net в ВБ.нет

Они смогли решить эту проблему, создав класс-контейнер со всем внутри него. Моя проблема в том, что данные, которые я ищу, всегда меняются. Первый набор всегда будет отличаться от «Chucknoland», который отображается в примере. Кто-нибудь может объяснить, как я могу извлечь эту информацию?

Обратите внимание, что переменные rRegion имеют значение того, на каком сервере там находится, Chuck Noland находится на OCE, а sSearch — это имя пользователя. Из-за проблем с ключами API мне пришлось удалить ключ API из кода... Но URL-адрес возвращает предоставленный Json.

 'URL string used to grab Summoner ID
    jUrlData = "https://oce.api.pvp.net/api/lol/" + rRegion + "/v1.4/summoner/by-name/" + sSearch + 


    ' Create a request for URL Data.
    Dim jsonRequest As WebRequest = WebRequest.Create(jUrlData)

    'request a response from the webpage
    Dim jsonResponse As HttpWebResponse = CType(jsonRequest.GetResponse(), HttpWebResponse)

    'Get Data from requested URL
    Dim jsonStream As Stream = jsonResponse.GetResponseStream()

    'Read Steam for easy access
    Dim jsonReader As New StreamReader(jsonStream)

    'Read Content
    Dim jsonResponseURL As String = jsonReader.ReadToEnd()


    jUrlString = jsonResponseURL

это запрос, который я должен получить, и это код, который я пытался использовать для отображения идентификатора для этого json.

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

    Dim obj As ID

    obj = JsonConvert.DeserializeObject(Of ID)(jUrlString)

    MsgBox(obj.id)


End Sub

Кто-нибудь может объяснить, как я могу заставить это работать?