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