Option Explicit
 
Private Sub Command1_Click()
    WebBrowser1.Visible = True ' No era necesario ponerlo en el timer (supongo)
    Call ChangeInterval
    Timer1.Enabled = True
    Call Timer1_Timer
End Sub
 
Private Sub Command2_Click()
    Timer1.Enabled = False
    Text1.Locked = False
    WebBrowser1.Visible = False
End Sub
 
Private Sub Form_Load()
    Me.Caption = "Long Life To Frogs! :D"
    WebBrowser1.Visible = False
    Timer1.Enabled = False
    Text2.Text = "5000" ' cada 5 seg
    Text1.Text = "http://www.google.es"
End Sub
 
Private Sub ChangeInterval()
    Timer1.Interval = CLng(Text2.Text)
End Sub
 
Private Sub Timer1_Timer()
    WebBrowser1.Navigate Text1.Text
    Call ChangeInterval
    ' ¿Esto es necesario que vaya aqui?; si quieres que el tiempo no pueda ser modificado cuando el Timer esté activado
    ' esto estaría de más... :P
End Sub