Função StrComp

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

Sintaxe:

StrComp (Texto1 As String, Texto2 As String[, Comparar])

Valor de retorno:

Integer

Parâmetro:

Texto1: qualquer expressão em caracteres

Texto2: qualquer expressão em caracteres

Comparar: este parâmetro opcional define o método de comparação. Se Comparar = 1, a cadeia de comparação diferencia maiúsculas de minúsculas. Se Comparar = 0, não é feita qualquer distinção entre letras maiúsculas e minúsculas.

Valor de retorno

• Se Texto1 < Texto2, a função devolve -1

• Se Texto1 = Texto2 a função devolve 0

• Se Texto1 > Texto2 a função devolve 1

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