text1="How can I, by using descriptive programming, find a specific text in a text string ?"
'InStr Returns the position where text is located in main string else returns 0
'InStr Returns the position where text is located in main string else returns 0
Code:
If (InStr(text1,"descriptive")<>0) Then
MsgBox "Text Found"
else
MsgBox "Text Not Found"
End If