VBA - strComp

La funzione StrComp restituisce un valore intero dopo aver confrontato le due stringhe date. Può restituire uno dei tre valori -1, 0 o 1 in base alle stringhe di input da confrontare.

  • Se String 1 <String 2, StrComp restituisce -1
  • Se String 1 = String 2, StrComp restituisce 0
  • Se String 1> String 2, StrComp restituisce 1

Sintassi

StrComp(string1,string2[,compare])

Descrizione dei parametri

  • String1- Un parametro obbligatorio. La prima espressione di stringa.

  • String2 - Un parametro obbligatorio. La seconda espressione di stringa.

  • Compare- Un parametro opzionale. Specifica il confronto di stringhe da utilizzare. Può assumere i seguenti valori.

    • 0 = vbBinaryCompare - Esegue il confronto binario (impostazione predefinita)

    • 1 = vbTextCompare - Esegue il confronto del testo

Esempio

Aggiungi un pulsante e aggiungi la seguente funzione.

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 si esegue la funzione di cui sopra, produce il seguente output.

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