Public Class Rootobject
	Public Property response() As Response
End Class

Public Class Response
	Public Property status() As Status
	Public Property songs() As Song()
End Class

Public Class Status
	Public Property version() As String
	Public Property code() As Integer
	Public Property message() As String
End Class

Public Class Song
	Public Property tag() As Integer
	Public Property [error]() As String
	Public Property score() As Integer
	Public Property title() As String
	Public Property message() As String
	Public Property artist_id() As String
	Public Property artist_name() As String
	Public Property id() As String
End Class

Imports System.Web.Script.Serialization
Dim rootObject As Rootobject = New JavaScriptSerializer().Deserialize(Of Rootobject)(json)

		If (rootObject.response.status.code = 0) Then
			For Each song As Song In rootObject.response.songs
				Console.WriteLine(song.title)
			Next
		End If