Reporting is one of the most important and least talked about aspects of a world-class threat intelligence program. Here’s how to do it right.
Private Sub cmdFindWord_Click() sWord = InputBox("Type word to find") If Len(Trim(sWord)) > 0 Then sNote = Me.txtNotes 'j = InStr(sNote, sWord) j = InStr(PlainText(sNote), sWord) End If If j <> 0 Then Me.txtNotes.SetFocus Me.txtNotes.SelStart = j - 1 Me.txtNotes.SelLength = Len(sWord) Else MsgBox "Word " & Chr(34) & sWord & Chr(34) & " not found!", vbQuestion, "WORD SEARCH" End If End Sub
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
19 Experts available now in Live!