Это на самом деле не для идентификатора, но вы можете сделать то же самое с ним, используя кнопку значения.
Dim allelements As HtmlElementCollection = WebBrowser1.Document.All
For Each webpageelement As HtmlElement In allelements
If webpageelement.GetAttribute("value") = "Log In" Then
webpageelement.InvokeMember("click")
End If
Next