bueno...al fin pude.....es algo pilingue pero es el primer bucle que me sale

Private Sub CBrock_click()
Do While Form1.WebBrowser.Busy ' Mientras el explorador anda ocupado
Wait (1) ' Espera un segundo y prueba de nuevo
Loop
For i = 0 To 10000
WebBrowser.Refresh
Wait (TBtimer.Text)
Next
End Sub
Private Sub Wait(s As Integer) 'Esperar s segundos
Dim t As Date
t = Now() + s / 86400#
Timer1.Enabled = True
While t > Now()
DoEvents
Wend
Timer1.Enabled = False
End Sub
ahora como rayos le hago para que cuando inicie se auto logee a una pagina web?
PS:(la pag web es en php...conste)