This is a search engine for the users at runtime and is very quick. It really works and is good for

by Mike U. (5 Submissions)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 23^rd February 2001
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

This is a search engine for the users at runtime and is very quick. It really works and is good for programs with a lot of text.

Rate This is a search engine for the users at runtime and is very quick. It really works and is good for



   Dim Search, Where   ' Declare variables.
   ' Get search string from user.
   Search = InputBox("Enter text to be found:")
   Where = InStr(Text1.Text, Search)   ' Find string in text.
   If Where Then   ' If found,
      Text1.SelStart = Where - 1   ' set selection start and
      Text1.SelLength = Len(Search)   ' set selection length.
   Else
      MsgBox "String not found."   ' Notify user.
   End If
End Sub

Private Sub Form_Load()
   Text1.Text = "This search works real quick."
End Sub

Download this snippet Add to My Saved Code

This is a search engine for the users at runtime and is very quick. It really works and is good for Comments

No comments have been posted about This is a search engine for the users at runtime and is very quick. It really works and is good for. Why not be the first to post a comment about This is a search engine for the users at runtime and is very quick. It really works and is good for.

This is a search engine for the users at runtime and is very quick. It really works and is good for

This is a search engine for the users at runtime and is very quick. It really works and is good for Comments

Post your comment

Difficulty