Lines Matching refs:strFind
252 Dim strFind As String variable
253 strFind = ""
255 … strFind = VBFindLines(docAnalysis, myComponent.CodeModule, "Me", count, bWholeWord:=True)
427 Dim strFind As String variable
428 …strFind = VBFindLines(docAnalysis, myComponent.CodeModule, "CreateObject", count, bWholeWord:=True…
439 If (strFind <> "") And (myComponent.Type <> vbext_ct_Document) Then
458 .Values.Add RID_STR_COMMON_ATTRIBUTE_INCLUDING & vbLf & Left(strFind, Len(strFind) - 1)
480 Function VBFindLines(docAnalysis As DocumentAnalysis, vbcm As CodeModule, strFind As String, _
508 Do While vbcm.Find(strFind, lngStartLine, _
539 … VBFindLines = VBFindLines & "[" & RID_STR_COMMON_VB_COMPONENT_MODULE & " " & strFind & _
636 Dim strFind As String variable
642 strFind = VBFindLines(docAnalysis, myComponent.CodeModule, "Public", _
648 (strFind = "")