StrComp: Difference between revisions

From NSB App Studio
Jump to navigation Jump to search
m Ghenne moved page Strcomp to StrComp
C185driver (talk | contribs)
Line 4: Line 4:


StrComp compares two strings and returns an integer value which indicates the alphabetical relationship between them. The required parameters, ''string1'' and ''string2'', are two valid string expressions. The optional parameter, ''compare'', is used to specify the type of comparison performed. StrComp returns -1 if ''string1'' is less than ''string2'', 0 if ''string1'' is equal to ''string2'', or 1 if ''string1'' is greater than ''string2''.
StrComp compares two strings and returns an integer value which indicates the alphabetical relationship between them. The required parameters, ''string1'' and ''string2'', are two valid string expressions. The optional parameter, ''compare'', is used to specify the type of comparison performed. StrComp returns -1 if ''string1'' is less than ''string2'', 0 if ''string1'' is equal to ''string2'', or 1 if ''string1'' is greater than ''string2''.
'''Table: Comparison constants'''
{| class="wikitable"
|-
! Constant !! Value !! Description
|-
| vbBinaryCompare || 0 || Binary comparison case sensitive (default)
|-
| vbTextCompare || 1 || Textual comparison, case insensitive
|}


== Example ==
== Example ==

Revision as of 06:27, 29 September 2015

StrComp(string1, string2[, compare])

Description

StrComp compares two strings and returns an integer value which indicates the alphabetical relationship between them. The required parameters, string1 and string2, are two valid string expressions. The optional parameter, compare, is used to specify the type of comparison performed. StrComp returns -1 if string1 is less than string2, 0 if string1 is equal to string2, or 1 if string1 is greater than string2.

Table: Comparison constants

Constant Value Description
vbBinaryCompare 0 Binary comparison case sensitive (default)
vbTextCompare 1 Textual comparison, case insensitive

Example

Rem StrComp Example
'StrComp compares two strings
Sort "Kenny", "Kyle", vbBinaryCompare
Sort "Eric", "eric", vbTextCompare
Sort "Wendy", "Stan", vbBinaryCompare
Sub Sort(string1, string2, compare)
  Dim Order
  Order = StrComp(string1, string2, compare)
  If Order < 0 Then
    Print string1 & " precedes " & string2
  ElseIf Order > 0 Then
    Print string2 & " precedes " & string1
  Else
    Print string1 & " and " & string2 _
      & " are equivalent"
  End If
End Sub

Output

Kenny precedes Kyle
Eric and eric are equivalent
Stan precedes Wendy