vb how to find more than one word in text box?

Question

0.00/5 (No votes)

See more:

I have the following code which searches for one word in a text box, but how do I search for two words?

VB

If InStr(SourceC.Text, "word1") Then
	form2.Show()
	Me.Hide()
Else
	form1.Show()
	Me.Hide()
End If

I have tried the following, but that doesn't work.

VB

If InStr(SourceC.Text, "word1, word2") Then
	form2.Show()
	Me.Hide()
Else
	form1.Show()
	Me.Hide()
End If

Any help is much appreciated.

Posted 20-Aug-10 6:23am

hamza_786

Updated 20-Aug-10 7:05am

AspDotNetDev

v2

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

AspDotNetDev · Answer 1 · 2010-08-20T07:14:00

This is the simple way:

VB

If InStr(SourceC.Text, "word1") Or InStr(SourceC.Text, "word2") Then
	form2.Show()
	Me.Hide()
Else
	form1.Show()
	Me.Hide()
End If

If you're using VB.Net, you can also make use of regular expressions:

VB

If System.Text.RegularExpressions.Regex.IsMatch(SourceC.Text, "word1|word2") Then
	form2.Show()
	Me.Hide()
Else
	form1.Show()
	Me.Hide()
End If

When you get a little more familiar with regular expressions, you can also make that a bit shorter:

VB

If System.Text.RegularExpressions.Regex.IsMatch(SourceC.Text, "word[12]") Then
	form2.Show()
	Me.Hide()
Else
	form1.Show()
	Me.Hide()
End If

Though I'm guessing your needs are not quite that specific. Also, some of that code might have to change depending on if you want to make sure BOTH the words appear at the same time, and if overlaps count (e.g., if the word "word12" will count towards both "word1" and "word12", because the former is a subset of the latter). Also, you could use "Contains" rather than "InStr".