El motivo del error es que estas indicando una longitud (el 7) que puede ser superior a la de la cadena de texto.
Si quieres buscar si la cadena "strlinea" contiene un texto en concreto, yo te sugiero que uses la función
Contains que te evitará que te salga ese error.