StrComp Function
Usporeduje dva niza te vraca cifarnu vrijednost koja predstavlja rezultat usporedbe.
Sintaksa:
StrComp (Text1 As String, Text2 As String[, Compare])
Vrati vrijednost:
Cjelobrojno
Parametar:
Tekst1: Bilo koji string izraz
Text2: Bilo koji string izraz
Compare: This optional parameter sets the comparison method. If Compare = 1, the string comparison is case-sensitive. If Compare = 0, no distinction is made between uppercase and lowercase letters.
Vrati vrijednost
-
Ako Tekst1 < Tekst2 funkcija vraca -1
-
Ako Tekst1 = Tekst2 funkcija vraca 0
-
Ako Tekst1 > Tekst2 funkcija vraca 1
Primjer:
Sub ExampleStrComp
Dim iVar As Single
Dim sVar As String
iVar = 123.123
sVar = Str$(iVar)
MsgBox strcomp(sVar , Str$(iVar),1)
End Sub