estoy buscando alguna funcion que me permita saber si esta un substring dentro de un string ...parece trabalenguas

a ver si un ejemplo sirve mejor..
mi_string ="JUANITO PEREZ ES UN NIÑO PEREJIL"
buscar dentro de estos STRING'S
s1 = "JUANITO TORRES"
s2 = "JUANITO LOPEZ"
s3 = "JUANITO PEREZ SOTO"
s4 = "JUANITO PEREZ"
comparo mi string con todas estas cadenas (que son mas cortas) y como resultado me deberia arrojar que es igual a s4....
probe con la funcion InStr, pero no me convence
if InStr(1,mi_string,s1)=1 then
...
...
elseif InStr(1,mi_string,s2)=1 then
..
..
end if
ademas mi idea es hacer esta consulta en un SQL y ahi si que quedo tirado porque el like me serviria si mi cadena de comparacion es menor a las otras cadenas....y con la clausula IN tampoco me pezca...
uff... sera ke soy tan pavo ke no veo ni una?

