Função StrComp
Retorna uma Variant (Integer) indicando o resultado de uma comparação de cadeia de caracteres.
Sintaxe
StrComp(cadeiadecaracteres1, cadeiadecaracteres2, [ comparar ])
A sintaxe da função StrComp tem estes argumentos nomeados:
| Parte | Descrição |
|---|---|
| cadeiadecaracteres1 | Obrigatório. Qualquer expressão de cadeia de caracteres válida. |
| cadeiadecaracteres2 | Obrigatório. Qualquer expressão de cadeia de caracteres válida. |
| compare | Opcional. Especifica o tipo de comparação de cadeia de caracteres. Se o argumentocomparar for Nulo, ocorrerá um erro. Se compare for omitido, a configuração Option Compare determina o tipo de comparação. |
Configurações
As configurações do argumentocompare são:
| Constante | Valor | Descrição |
|---|---|---|
| vbUseCompareOption | -1 | Executa uma comparação usando a configuração da instrução da Option Compare. |
| vbBinaryCompare | 0 | Executa uma comparação binária. |
| vbTextCompare | 1 | Executa uma comparação textual. |
| vbDatabaseCompare | 2 | Somente Microsoft Access. Executa uma comparação baseada nas informações do seu banco de dados. |
Valores de retorno
A função StrComp tem os seguintes valores de retorno:
| Se | StrComp retorna |
|---|---|
| string1 será menor que a string2 | -1 |
| string1 será igual a string2 | 0 |
| string1 será maior que string2 | 1 |
| string1 ou string2 será Null | Null |
Exemplo
Este exemplo usa a função StrComp para retornar os resultados de uma comparação de cadeia de caracteres. Se o terceiro argumento for 1, uma comparação textual será executada; se o terceiro argumento for 0 ou omitido, uma comparação binária será executada.
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.
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.