Imports System.IO
Imports System.Text
Imports System.Net
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
        Dim address As String = _
        "http://graph.facebook.com/4?fields=id,name,link"
        Dim client As WebClient = New WebClient()
        Dim reader As StreamReader = New StreamReader(client.OpenRead(address))
        TextBox1.Text = reader.ReadToEnd
 
    End Sub
End Class