VBA - strComp

A função StrComp retorna um valor inteiro após comparar as duas strings fornecidas. Ele pode retornar qualquer um dos três valores -1, 0 ou 1 com base nas strings de entrada a serem comparadas.

Se String 1 <String 2, então StrComp retorna -1
Se String 1 = String 2, então StrComp retorna 0
Se String 1> String 2, então StrComp retorna 1

Sintaxe

StrComp(string1,string2[,compare])

Descrição do Parâmetro

String1- Um parâmetro obrigatório. A primeira expressão de string.
String2 - Um parâmetro obrigatório. A segunda expressão de string.
Compare- Um parâmetro opcional. Especifica a comparação de string a ser usada. Pode assumir os seguintes valores.
- 0 = vbBinaryCompare - executa comparação binária (padrão)
- 1 = vbTextCompare - Executa comparação de texto

Exemplo

Adicione um botão e adicione a seguinte função.

Private Sub Constant_demo_Click()
   Dim var1 as Variant
   msgbox("Line 1 :" & StrComp("Microsoft","Microsoft"))
   msgbox("Line 2 :" &StrComp("Microsoft","MICROSOFT"))
   msgbox("Line 3 :" &StrComp("Microsoft","MiCrOsOfT"))
   msgbox("Line 4 :" &StrComp("Microsoft","MiCrOsOfT",1))
   msgbox("Line 5 :" &StrComp("Microsoft","MiCrOsOfT",0))
End Sub

Quando você executa a função acima, ela produz a seguinte saída.

Line 1 :0
Line 2 :1
Line 3 :1
Line 4 :0
Line 5 :1

↰ Previous page