Advertisement
Guest User

Get Avatar Facebook

a guest
Sep 20th, 2021
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 1.05 KB | None | 0 0
  1. Public Class Form1
  2.     Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
  3.         Try
  4.             Form2.PictureBox1.ImageLocation = ("https://graph.facebook.com/me/picture?width=220&height=220&access_token=" & TextBox1.Text)
  5.             Form2.Show()
  6.         Catch ex As Exception
  7.             'MsgBox("Unable to load data from ""Facebook""! The app will automatically reload", MsgBoxStyle.Exclamation, "Notify")
  8.         End Try
  9.     End Sub
  10.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  11.         Try
  12.             Form2.PictureBox1.ImageLocation = ("https://graph.facebook.com/me/picture?width=220&height=220&access_token=" & TextBox1.Text)
  13.             Form2.Show()
  14.         Catch ex As Exception
  15.             'MsgBox("Unable to load data from ""Facebook""! ỨThe app will automatically reload, MsgBoxStyle.Exclamation, "Notify")
  16.         End Try
  17.     End Sub
  18. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement