StrComp Function

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:

Número inteiro

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

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