Solved

Find a string in another string

Posted on 2006-06-20
14
300 Views
Last Modified: 2010-08-05
What function can help me find a string in another string.
Example :

string str1 = "i am in my house"
string str2 = "in my"
string str3 = "inmy"

compare_function(str1,str2) will return true because str2 was found in str1.
compare_function(str1,str3) will return false.


0
Comment
Question by:Cyber-EE
  • 3
  • 3
  • 2
  • +2
14 Comments
 
LVL 44

Accepted Solution

by:
Arthur_Wood earned 50 total points
ID: 16941408
you can use the Instr function to accomplish this.  Also StrComp.  Look them both up in the VB help system.

(Give a man a fish and you feed him for a day.  Teach a man how to fish for himself, and you feed him for the rest of his life)

AW
0
 
LVL 8

Expert Comment

by:kaliyugkaarjun
ID: 16942073
use Instr() function it returns the position of the first occurrence of one string within another.

InStr(sCheck, sMatch[, Start[, Compare]])

Arguments:
sCheck      => Required. String expression being searched.
sMatch      =>Required. String expression being searched for.
Start         Optional.  => Numeric expression that sets the starting position for each search. If omitted, search   begins at the first character position (Start = 1).
Compare      Optional.  => Numeric value indicating the kind of comparison to use when evaluating substrings. If omitted, a binary comparison is performed.

Example:
InStr("abc", "a")             =>  1

For ur code :
dim i=0;
if Instr(str1,str2)  != 0 then
//substring found so do ur required operation
end if

Cheers
0
 
LVL 13

Expert Comment

by:jmundsack
ID: 16942462
kaliyugkaarjun, the optional start argument is the first argument, not the third:

InStr([start, ]string1, string2[, compare])

Jon
0
 
LVL 20

Expert Comment

by:alainbryden
ID: 16943478
jmundsack is right. Arthur, is too, he should probably look up something so simple, but he did offer up points that he may or may not have payed for so he might as well get a full answer. To make Kaliyugkaarjun's answer more legible and correct:

Function compare_function(byVal str1 As String, str2 As String) As Boolean
    compare_function = InStr$(str1, str2) <> 0
End Function

(To Kaliyugkaarjun's: != does not make sense in visual basic and dim i = 0 was not necessary and 'ur' is not a word.)

Cheers :D

Alain
0
 

Expert Comment

by:deandany
ID: 16943993
alainbryden's apprach is the easiest
-Dean
0
Top 6 Sources for Identifying Threat Actor TTPs

Understanding your enemy is essential. These six sources will help you identify the most popular threat actor tactics, techniques, and procedures (TTPs).

 
LVL 8

Expert Comment

by:kaliyugkaarjun
ID: 16948578
Hey bro just chk out i have written  comment  and not statement in vb :D

//substring found so do ur required operation

cheers
0
 
LVL 20

Expert Comment

by:alainbryden
ID: 16951657
Hey bro, the proper way to comment in vb is with ' not //, this isn't java :D

cheers
0
 

Expert Comment

by:deandany
ID: 16952793
ya kalyugkaarjun ... ur comment was good but a bit "Java"ish ...


be happy
0
 
LVL 8

Expert Comment

by:kaliyugkaarjun
ID: 16957217
Forget it ...it was just to mention that the line has nothing to do with code...

InStrRev (VB 6 Only)        

>Returns the first occurance of one string in another, starting from the right to the left.  

>InstrRev(string1, string2[,  start[, compare]])

InStr  

>Returns the first occurance of one string in another, starting from the left to the right.        

>InStr([start, ]string1, string2[, compare])




0
 
LVL 20

Expert Comment

by:alainbryden
ID: 17308209
I'd object, while Arthur_wood gave a partial answer, leading in the right direction, what the user wanted was a working solution, and it was not he, but kaliyugkaarjun (almost) and I that gave a working solution.
0

Featured Post

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

Suggested Solutions

The debugging module of the VB 6 IDE can be accessed by way of the Debug menu item. That menu item can normally be found in the IDE's main menu line as shown in this picture.   There is also a companion Debug Toolbar that looks like the followin…
Article by: Martin
Here are a few simple, working, games that you can use as-is or as the basis for your own games. Tic-Tac-Toe This is one of the simplest of all games.   The game allows for a choice of who goes first and keeps track of the number of wins for…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

747 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now