VB.NET : Contoh cara guna API key dari adf.ly

Dim request As HttpWebRequest = HttpWebRequest.Create("http://api.adf.ly/api.php?key=28532a9e7a2f652aa5809771ee58ceaf&uid=3726590&advert_type=int&domain=adf.ly&url=" & NsTextBox1.Text)
    Dim response As HttpWebResponse = request.GetResponse
    Dim reader As New StreamReader(response.GetResponseStream)
    Dim strings As String = reader.ReadToEnd
    NsTextBox1.Text = strings 

NsTextBox1.Text = New Net.WebClient().DownloadString("http://api.adf.ly/api.php?key=28532a9e7a2f652aa5809771ee58ceaf&uid=3726590&advert_type=int&domain=adf.ly&url=" + NsTextBox1.Text)