[VB2010] Problem mit JSON

Hallo,

Ich habe versucht ein Programm zu schreiben, um mir die letzten TBM Transaktionen anzuzeigen.
Nur leider h�ngt dies beim Lesen der JsonStrings.
Ich benutze [Only registered and activated users can see links. Click Here To Register...] Library daf�r.

Hier ist mein Code:

Code:

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

Public NotInheritable Class SplashScreen1

    Private Sub SplashScreen1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        System.Threading.Thread.Sleep(1000)
        Me.Hide()
        Dim webClient As New System.Net.WebClient
        Dim result As String = webClient.DownloadString("http://www.elitepvpers.com/theblackmarket/api/transactions.php?u=2556636&type=received&secretword=nope.avi")
        Dim reader As JsonTextReader
        reader = New JsonTextReader(New StringReader(result))
        Dim Data() As String
        While (reader.Read())
            Dim i As Integer
            i = 0
            ReDim Preserve Data(i)
            [COLOR="Red"]Data(i) = reader.Value("eg_transactionid").ToString[/COLOR]
            MsgBox(Data(i))
            i = i + 1

        End While

    End Sub

End Class

secretword Zensiert
Das rote ist der Fehler, nur habe ich keine Ahnung wie ich den beheben kann.
Edit: habe es �ber XML geregelt, funktioniert super!