Função StrComp

Compara duas cadeias e devolve um valor de números inteiros que representa o resultado da comparação.

Sintaxe:


StrComp (string1 As String, string2 As String[, Compare As Integer]) As Integer

Parâmetros:

string1: Qualquer expressão de cadeia de caracteres

string2: Qualquer expressão de cadeia de caracteres

Compare: Este parâmetro opcional define o método de comparação. Se Compare = 1, a comparação de cadeias de caracteres distingue maiúsculas de minúsculas. Se Compare = 0, não é feita qualquer distinção entre maiúsculas e minúsculas.

Tipo de retorno:

Integer

Se string1 < string2, a função devolve -1
Se string1 = string2, a função devolve 0
Se string1 > string2, a função devolve 1

Códigos de erro

5 Chamada de procedimento inválido

Exemplo:


Sub ExampleStrComp
Dim iVar As Single
Dim sVar As String
    iVar = 123.123
    sVar = Str$(iVar)
    MsgBox strcomp(sVar , Str$(iVar),1)
End Sub