Help with removing parts of a textbox's content

[vbtryer]

Hi guys,
For the last 30 mins i have been trying to remove a part of a textbox, in this case i want to remove http://www.youtube.com/watch?v= and remove anything after the end starting with &. do you understand what I mean? Any help appreciated, I really tried.

[GeekByChoiCe]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim youTube As String = "http://www.youtube.com/watch?v=KoSx4paZ7Sg&feature=response_watch"
        Dim tmpStr As String = youTube.Replace("http://www.youtube.com/watch?v=", "")
        Dim index As Integer = tmpStr.IndexOf("&")
        TextBox1.Text = tmpStr.Substring(0, index)
    End Sub

[vbtryer]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim youTube As String = "http://www.youtube.com/watch?v=KoSx4paZ7Sg&feature=response_watch"
        Dim tmpStr As String = youTube.Replace("http://www.youtube.com/watch?v=", "")
        Dim index As Integer = tmpStr.IndexOf("&")
        TextBox1.Text = tmpStr.Substring(0, index)
    End Sub

Thanks so much, works like a charm!

[GeekByChoiCe]

then please mark this thread as solved :D