在线求助！！关于IE


Private Sub Form_Load()
  WebBrowser1.GoHome
End SubPrivate Sub Form_Resize()
  WebBrowser1.Width = Form1.ScaleWidth
  WebBrowser1.Height = Form1.ScaleHeight - 600
End SubPrivate Sub GOButton_Click()
  WebBrowser1.Navigate (Text1.Text)//我想把text设为固定值//
End SubPrivate Sub NextButton_Click()
  WebBrowser1.GoBack
End SubPrivate Sub PrvButton_Click()
  WebBrowser1.GoForward
End SubPrivate Sub StopButton_Click()
  WebBrowser1.Stop
End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)
  If KeyAscii = 13 Then
    WebBrowser1.Navigate (Text1.Text)
  End If
End SubPrivate Sub WebBrowser1_BeforeNavigate(ByVal URL As String, ByVal Flags As Long, ByVal TargetFrameName As String, PostData As Variant, ByVal Headers As String, Cancel As Boolean)End Sub
以上是IE 的源代码我想把地址设为固定的，
请问怎么做，
现在他的方法是用text赋值，
我想固定以后不用赋值，而是直接进入我接定的地方！
望各位大虾指点！