bIsEqual Then
         ' Success:
         iR = 0
         plBinSearch = iP
      ElseIf bGreater Then
         ' the centre element is greater than the
         ' item we're searching for.  Set the end
         ' to the centre element &amp; repeat:
         lEnd = iP - 1
         plBinSearch = plBinSearch(vItems, tRows, lMatchFor, lStart, lEnd,
          lIndentMatchLevel, iR)
      Else
         ' the centre element is less than the
         ' item we're searching for.  Set the start
         ' to the cen