Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
        If TextBox1.Text = "" Or TextBox2.Text = "" Then Exit Sub
        Dim Counter As Integer
        For Counter = TextBox1.Text To TextBox2.Text
            Dim Url = "http://www.racingpost.co.uk/....." & Counter
            With WebBrowser1
                .Navigate(url)
            End With
        Next
 
    End Sub