devxlogo

Finding Text in a Text Box

Finding Text in a Text Box

Question:
I am looking for code or VBX that allows a user to use an inputbox to locate a word within a textbox. The textbox is connected to a Access 2table memo field. Can you help?

Answer:
How about this simple piece of code:

Dim strInput as StringDim i as IntegerstrInput = InputBox(“Enter a string to search for:”)For i = 1 to len(txtTableMemo)   If mid$(txtTableMemo, i, len(strInput)) = strInput Then      MsgBox “Found the text — doing whatever with it.”      Exit For   End IfNext i
This is the simplest method for looking in a single text box or string. On average, it will only search half of the text in the txtTableMemo box.

devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist