Public Class Form1 Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted Try Form2.PictureBox1.ImageLocation = ("https://graph.facebook.com/me/picture?width=220&height=220&access_token=" & TextBox1.Text) Form2.Show() Catch ex As Exception 'MsgBox("Unable to load data from ""Facebook""! The app will automatically reload", MsgBoxStyle.Exclamation, "Notify") End Try End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Try Form2.PictureBox1.ImageLocation = ("https://graph.facebook.com/me/picture?width=220&height=220&access_token=" & TextBox1.Text) Form2.Show() Catch ex As Exception 'MsgBox("Unable to load data from ""Facebook""! ỨThe app will automatically reload, MsgBoxStyle.Exclamation, "Notify") End Try End Sub End Class
VIDEO DEMO:
Hoặc mọi người có thể sữ dụng cách đơn giản khác mà không cần phải
GET TOKEN
của tài khoản mà chỉ cần bỏ ID USER
vào là thành công.PictureBox1.ImageLocation = "http://graph.facebook.com/ my id /picture?type=square"
Các bạn chỉ cần thay
MY ID
phía trong đoạn code là ok rồi nhé mọi người.Chúc các bạn thành công với thủ thuật đơn giản này.