Webbroser Click Button Pubblica Facebook

[aizenn]

Salve, sono riuscito tramite Webbrowser a scrivere nella textarea di facebook con questo codice:

For Each elem As HtmlElement In WebBrowser1.Document.GetElementsByTagName("textarea")            If elem.GetAttribute("name") = "xhpc_message" Then
                elem.Focus()
                elem.SetAttribute("value", ("provaa"))


                Exit For


            End If
        Next

Però non riesco a cliccare Pubblica.
Qualcuno sa come fare?
Grazie in anticipo.