IBM Lotus Symphony
|
Primerja dva niza in vrne celoštevilsko vrednost, ki predstavlja rezultat primerjave.
StrComp (Text1 As String, Text2 As String[, Compare])
Celo število
Text1: Katerikoli nizovni izraz
Text2: Katerikoli nizovni izraz
Compare: Ta neobvezni parameter nastavi vrsto primerjave. Če Compare = 1, primerjava nizov razlikuje velike in male črke. Če Compare = 0, primerjava ne ločuje med malimi in velikimi črkami.
Če Text1 < Text2, funkcija vrne -1
Če Text1 = Text2, funkcija vrne 0
Če Text1 > Text2, funkcija vrne 1
Sub ExampleStrComp
Dim iVar As Single
Dim sVar As String
iVar = 123.123
sVar = Str$(iVar)
Msgbox strcomp(sVar , Str$(iVar),1)
end sub