Dla potrzeb systemu PROMOTIC jest dogodniejszym stosowanie metody: Pm.StringCmp.
n = StrComp(string1, string2[, compare])
string1 | (String) Łańcuch tekstowy |
---|---|
string2 | (String) Łańcuch tekstowy |
compare | [opcjonalne] (Integer) Wartość liczbowa, określająca rodzaj zastosowanego porównywania łańcuchów Jeżeli nie jest ustawione, wtedy jest wykonane porównanie binarne. vbBinaryCompare - wykona porównanie binarne vbTextCompare - wykona porównanie tekstowe |
Dim sStr1, sStr2, nComp
sStr1 = "ABCD"
sStr2 = "abcd"
nComp = StrComp(sStr1, sStr2, 1) 'Zwraca 0
nComp = StrComp(sStr1, sStr2, 0) 'Zwraca -1
nComp = StrComp(sStr2, sStr1) 'Zwraca 1