How can i make it so, when you press a button, it opens a text file(txt), searches for specific text, then matches it with everything in text1. if it all matches, show a msgbox.
thx.
pscode.com
Quote from: OuTLawZGoSu on December 18, 2003, 01:33 PM
How can i make it so, when you press a button, it opens a text file(txt), searches for specific text, then matches it with everything in text1. if it all matches, show a msgbox.
thx.
Easy.
1. Make a button.
2. Add code to the button to open a text file and read the contents.
3. While reading the contents, search for the specific text.
4. I dont understand the "matches it with everything in text1" part.
5. If it all matches, show a msgbox.
Hope this helps.
lol.
Quote from: Grok on December 18, 2003, 05:27 PM
Easy.
1. Make a button.
2. Add code to the button to open a text file and read the contents.
3. While reading the contents, search for the specific text.
4. I dont understand the "matches it with everything in text1" part.
5. If it all matches, show a msgbox.
Hope this helps.
I got everything exept for the search for the text code. I dont know how to search for the text in the text file.
And number 4, i meant, "If text1.text = Searched text Then"
i suggest looking into the LIKE operator?
Quote from: OuTLawZGoSu on December 18, 2003, 06:26 PM
Quote from: Grok on December 18, 2003, 05:27 PM
Easy.
1. Make a button.
2. Add code to the button to open a text file and read the contents.
3. While reading the contents, search for the specific text.
4. I dont understand the "matches it with everything in text1" part.
5. If it all matches, show a msgbox.
Hope this helps.
I got everything exept for the search for the text code. I dont know how to search for the text in the text file.
And number 4, i meant, "If text1.text = Searched text Then"
InStr
InStrRev
StrComp
Like
Those are sufficient for most tasks.
Sorry refer to my post below , bashed the keyboard and accidently posted and didnt realise =/ My bad
Against better judgement im gonna post this up , maybe u can find a better example somewhere else
Dim Scompare as Long
Dim String1 as String
Dim String2 as String
Scompare = InStr(String1, String2, vbTextCompare)
IF Scompare = > 0 Then
dowhateverupleaserighthere
End if
there u go knock yourself out