.NET How do i make my facebook bot comment? cant find the right ID on facebook !!! HELP

Code
Public Class sjalfupp



    Dim logintakki As Boolean

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)

    End Sub



    Private Sub sjalfupp_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

  WebBrowser1.Navigate("http://www.facebook.com/login.php")

  ListBox1.Items.Add("18000")

  logintakki = False

    End Sub



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

  logintakki = True

  Try

    WebBrowser1.Document.GetElementById("email").SetAttribute("value", TextBox5.Text)

    WebBrowser1.Document.GetElementById("pass").SetAttribute("value", TextBox6.Text)

    WebBrowser1.Document.GetElementById("login").InvokeMember("click")

  Catch ex As Exception

  End Try

  Label1.Text = ("Innskráður")



    End Sub

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

  WebBrowser1.Navigate(TextBox1.Text)

    End Sub



    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

  Do

    Timer1.Enabled = True

    Timer1.Start()

    WebBrowser1.Navigate(TextBox1.Text)

    WebBrowser1.Document.GetElementById("js_5").InnerText = (TextBox2.Text)

    SendKeys.Send("{Enter}")

  Loop

    End Sub



    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

  Timer1.Enabled = False

  Stop

    End Sub



    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

  Timer1.Interval = ListBox1.SelectedItem

    End Sub



    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged



    End Sub



    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

  Close()

    End Sub



End Class