Devuelve una variante (entero) que indica el resultado de una expresión de cadena.
Sintaxis
StrComp(cadena1, cadena2 [, comparar ] )
La sintaxis de la función StrComp consta de los siguientes argumentos:
| Argumento | Descripción |
|---|---|
| cadena1 | Obligatorio. Cualquier expresión de cadena válida. |
| cadena2 | Obligatorio. Cualquier expresión de cadena válida. |
| comparar | Opcional. Especifica el tipo de comparación de cadenas. Si el argumento de comparaciónes nulo, se produce un error. Si se omite la comparación , la opción Comparar determina el tipo de comparación. |
Configuración
La configuración del argumento de comparación es:
| Constante | Valor | Descripción |
|---|---|---|
| vbBinaryCompare | 0 | Realiza una comparación binaria. |
| vbTextCompare | 1 | Realiza una comparación textual. |
Valores devueltos
La función StrComp tiene los siguientes valores devueltos:
| Si | StrComp devuelve |
|---|---|
| cadena1 es menor que cadena2 | -1 |
| cadena1 es igual a cadena2 | 0 |
| cadena1 es mayor que cadena2 | 1 |
| cadena1 o cadena2 es Null | Nulo |
Ejemplo de consulta
| Expresión | Resultados |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; | Devuelve los valores del campo "IdDeProducto", compara los valores de "IdDeProducto" con "PRO_XYZ1" y devuelve los resultados en la columna ComparisonResult. "ProductID" es igual a "PRO_XYZ10", la función StrComp devolverá 0. Si "ProductID" es menor que "PRO_XYZ10", la función StrComp devolverá -1. Si "ProductID" es mayor que "PRO_XYZ10", la función StrComp devolverá 1. Si "ProductID" o "PRO_XYZ10" es NULL, la función StrComp devolverá NULL. |
Ejemplo VBA:
Nota
Los ejemplos siguientes muestran el uso de esta función en un módulo de Visual Basic para Aplicaciones (VBA).
En este ejemplo se usa la función StrComp para devolver los resultados de una comparación de cadenas. Si el tercer argumento es 1, se realiza una comparación textual; Si el tercer argumento es 0 o se omite, se realiza una comparación binaria.
Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.