VBA strComp函數

StrComp

StrComp函數返回比較這兩個給定的字符串後的整數值。它可以返回任何三個值-1，0或1根據所輸入的字符串進行比較。

• 如果 String 1 < String 2 那麼 StrComp 返回  -1

• 如果 String 1 = String 2 那麼 StrComp 返回  0

• 如果 String 1 > String 2 那麼 StrComp 返回 1

語法

StrComp(string1,string2[,compare])

描述:

• String1, 必需的參數。第一個字符串表達式。

• String2, 必需的參數。第二個字符串表達式。

• Compare, 一個可選的參數。指定字符串比較中使用。它可以使用以下值：

  • 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