StrComp

StrComp函数在比较两个给定字符串后返回一个整数值。 它可以根据要比较的输入字符串返回三个值-1,0或1中的任何一个。

• 如果String 1
• 如果String 1 = String 2，则StrComp返回0
• 如果String 1> String 2，则StrComp返回1

语法 (Syntax)

StrComp(string1,string2[,compare]) 

参数描述 (Parameter Description)

• String1 - 必需参数。 第一个字符串表达式。

• String2 - 必需参数。 第二个字符串表达式。

• Compare - 可选参数。 指定要使用的字符串比较。 它可以采用以下值。

  • 0 = vbBinaryCompare - 执行二进制比较（默认）

  • 1 = vbTextCompare - 执行文本比较

例子 (Example)

添加按钮并添加以下功能。

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

执行上述功能时，会产生以下输出。

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