vb.net - get all strings between 2 strings -

   public function getstringbetween(byval inputtext string, _   byval starttext string, _   byval endtext string)          dim lntextstart long         dim lntextend long          lntextstart = instr(startposition, inputtext, starttext, vbtextcompare) + len(starttext)         lntextend = instr(lntextstart, inputtext, endtext, vbtextcompare)         if lntextstart >= (startposition + len(starttext)) , lntextend > lntextstart             getstringbetween = mid$(inputtext, lntextstart, lntextend - lntextstart)         else             getstringbetween = "error"         end if     end function     dim xa string         dim x string = webbrowser1.documenttext 

usage

  xa = getstringbetween(x, textbox1.text, textbox2.text)      msgbox(xa) 

i have tried many many diffrent ways try strings between 2 other strings each etc site has more 1 string 2 strings first string between 2 strings sorry hard explain :/

probably concise way write code through regex, overkill.
simple method same thing using string.indexof

public function getstringbetween(byval inputtext string, _                                  byval starttext string, _                                  byval endtext string)      dim startpos integer     dim endpos integer     dim lenstart integer     startpos = inputtext.indexof(starttext, stringcomparison.currentcultureignorecase)     if startpos >= 0         lenstart = startpos + starttext.length         endpos = inputtext.indexof(endtext, lenstart, stringcomparison.currentcultureignorecase)         if endpos >= 0             return inputtext.substring(lenstart, endpos - lenstart)         end if     end if     return "error" end function