el codigo esta bien, pero no funciona lo que te dije, de navegar a ese link, fijate que despues de navegar a ese link no aparece el mensaje de que te logueaste o en mi caso como no tengo cuenta en esa pagina, me tendria que mostrar un mensaje de que no estan bein los datos, pero no pasa nada.
aca te pongo una forma que se me ocurrio y funciona, como los botones submit no tienen nombre pues hay que buscar otra forma, a mi me aparece "Has ingresado un nombre de usuario o contraseña no válido" obviamente porque le puse un nombre de usuario y contraseña cualquieras, pero si muestra eso quiere decir que funciona.
- Private Sub Command1_Click() 
-     WebBrowser1.Document.All("vb_login_username").Value = "usuario" 
-     WebBrowser1.Document.All("vb_login_password").Value = "contraseña" 
-     Call Logearse 
- End Sub 
-   
- Private Sub Form_Load() 
-     WebBrowser1.Navigate "http://www.SPAM(149)" 
- End Sub 
-   
- Private Sub Logearse() 
-     Dim oDoc As HTMLDocument 
-     Dim iElements As Integer, i As Integer 
-     Dim oInputs As HTMLInputElement 
-   
-     Set oDoc = WebBrowser1.Document 
-   
-     With WebBrowser1.Document 
-        iElements = (oDoc.getElementsByTagName("INPUT").length - 1) 
-        For i = 0 To iElements 
-            Set oInputs = oDoc.getElementsByTagName("INPUT")(i) 
-            If oInputs.Type = "submit" And oInputs.Value = "Entrar" Then 
-                oInputs.Click 
-                Exit For 
-            End If 
-            'List1.AddItem oInputs.Name & " | " & oInputs.Type & " | " & oInputs.Value 
-        Next i 
-     End With 
- End Sub 
ahora te preguntaras que carajo hace esto, pues lo que hace es recorrer todos los elementos de la pagina web, y si encuentra un boton de tipo "submit" y con el caption del boton en "Entrar" le hace click.
fijate que hay una linea de codigo comentada, esa linea la podes descomentar y poner un listbox y te va a cargar una lista con todos los controles web y nombres de la pagina.
PD: debes agregar la referencia a 
Microsoft HTML Object Library.saludos.