Devuelve la posición de una ocurrencia de una cadena dentro de otra, desde el final de la cadena.
InStrRev(cadena1, cadena2[, inicio[, comparar]])
El argumento comparar puede tener los siguientes valores:
| Constante | Valor | Descripción |
|---|---|---|
| vbBinaryCompare | 0 | Realiza una comparación binaria. |
| vbTextCompare | 1 | Realiza una comparación textual. |
InStrRev devuelve los siguientes valores:
| Si | InStrRev devuelve |
|---|---|
| cadena1 es de longitud cero | 0 |
| cadena1 es Null | Null |
| cadena2 es de longitud cero | inicio |
| cadena2 es Null | Null |
| cadena2 no se encuentra | 0 |
| cadena2 se encuentra dentro de cadena1 | Posición en la que se encuentra la coincidencia |
| inicio > Len(cadena2) | 0 |
Los siguientes ejemplos utilizan la función InStrRev para buscar una cadena:
Dim SearchString, SearchChar, MiPos SearchString ="XXpXXpXXPXXP" ' Cadena en la que buscar. SearchChar = "P" ' Se busca "P". MiPos =InstrRev(SearchString,SearchChar,10,0)' Una comparación ' binaria que comienza en la ' posición 10. Devuelve 9. MiPos =InstrRev(SearchString,SearchChar,-1,1)' Una comparación ' textual que comienza en ' la última posición. Devuelve 12. MiPos =InstrRev(SearchString,SearchChar,8)' La comparación es ' binaria de forma predeterminada (se ' omite el último argumento). Devuelve 0.
Nota La sintaxis de la función InStrRev no es la misma que la sintaxis de la función InStr.
| Ayuda de Javascript y Vbscript para Javascripts.astalaweb.com. |