C# / VB.NET - Problema ListBox con WebBrowser

Ciao ragazzi, ho un PROBLEMONE, io ho creato un form, dove carico un file .txt dal pc, e carica tutta la lista delle parole che ho scritto nel ListBox (FIN QUI TUTTO OK), il WebBrowser che intanto è aperto su una pagina fissa "Google mettiamo caso" aspetta che una parola selezionata dalla ListBox venga premuta e con il bottone a sua volta premuto carichi la parola nel "textbox"di Google.
Io ho scritto il codice, MA, su 2mila parole della ListBox solo la prima della lista me la carica nella "textbox" di google. Le altre non funzionano, come se non leggessi i "a capo riga" MI POTETE AIUTARE?

Senza vedere il codice non mi pare possibile ...

Giusto, scusa ecco:

Dim streamer As IO.StreamReader

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        Button1.Enabled = True 'Abilita Button2

    End Sub

    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        OpenFileDialog1.ShowDialog()
        TextBox1.Text = OpenFileDialog1.FileName
        streamer = IO.File.OpenText(TextBox1.Text)
        Dim mystring() As String = streamer.ReadToEnd.Split(vbNewLine)

        ListBox1.Items.AddRange(mystring)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim asd = ListBox1.SelectedItem
        WebBrowser1.Document.GetElementById("txtSearch").InnerText = (asd)
    End Sub

    Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow
        e.Cancel = True
    End Sub

Ecco un'immagine:
i50.tinypic.com/…

 Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        'Clicca sull'item che vuoi .......
        Dim asd = ListBox1.SelectedItem
        WebBrowser1.Document.GetElementById("txtSearch").InnerText = (asd)
    End Sub

non ho capito
Si ma il codice lo inverto col button2 o cancello quello del button2 dato che è uguale?

Ho provato a inserire il codice che mi hai dato e non va neancora

Togli quello del button

Se non funziona facci avere uno zip di tutto il codice e del file dei dati così controlliamo di persona ...

Problema risolto