how to grab every word that has the ! in it "good rating for answer"

**newprogram** · Aug 26th, 2007, 02:11 AM

how would I grab all that words with the ! in it and put them in text1 using the webbrowser control

the webpage look like

hi! other!then go to be and yes!

so I would want text1 to look like
hi!
other!then
yes!

**jcis** · Aug 26th, 2007, 02:33 AM

Code:

    Dim Str As String
    Str = "hi! other!then go to be and yes!"
    If InStr(Str, "!") <> 0 Then
        Text1.Text = Join(Filter(Split(Str, Space(1)), "!"), vbNewLine)
    End If

**newprogram** · Aug 26th, 2007, 02:40 AM

No I want it to grab the text off what in webbrowser1 , so at let say www.mysite.com I want to read that webpage and if any thing with the ! in it to put in text1

Originally Posted by jcis

Code:

    Dim Str As String
    Str = "hi! other!then go to be and yes!"
    If InStr(Str, "!") <> 0 Then
        Text1.Text = Join(Filter(Split(Str, Space(1)), "!"), vbNewLine)
    End If

**westconn1** · Aug 26th, 2007, 04:04 AM

so read the source into a string Str

**Jazz00006** · Aug 26th, 2007, 05:32 AM

Code:

Dim Str As String
    Str = Inet1.OpenURL(Text1.Text)
    If InStr(Str, "!") <> 0 Then
        Text2.Text = Join(Filter(Split(Str, Space(1)), "!"), vbNewLine)
    End If

Add an inet control onto your form. Taken from jcis's code etc.

Thread: how to grab every word that has the ! in it "good rating for answer"

Thread Tools

Display

how to grab every word that has the ! in it "good rating for answer"

Re: how to grab every word that has the ! in it

Re: how to grab every word that has the ! in it

Re: how to grab every word that has the ! in it "good rating for answer"

Re: how to grab every word that has the ! in it "good rating for answer"

Posting Permissions