VBA - strComp

StrComp 函式在比較給定的兩個字串後返回一個整數。基於待比較的輸入字串，它可以返回三個值之一 -1、0 或 1。

• 如果字串 1 < 字串 2，則 StrComp 返回 -1
• 如果字串 1 = 字串 2，則 StrComp 返回 0
• 如果字串 1 > 字串 2，則 StrComp 返回 1

語法

StrComp(string1,string2[,compare]) 

引數描述

• 字串 1 - 必需引數。第一個字串表示式。

• 字串 2 - 必需引數。第二個字串表示式。

• 比較 - 可選引數。指定要使用的字串比較。它可以採用以下值。

  • 0 = vbBinaryCompare - 執行二進位制比較（預設值）

  • 1 = vbTextCompare - 執行文字比較

示例

新增一個按鈕並新增以下函式。

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