StrComp 函式

傳回指出字串比較結果的值

語法

StrComp(string1, string2[, compare])

引數:

  • string1必要。任何有效的字串表示式。
  • string2必要。任何有效的字串表示式。
  • Compare選擇性。指出評估字串時要使用之比較類型的數值。如果省略,則會執行二進位比較。如需相關值,請參閱設定值區段。
  • 設定值:Compare 引數可具有下列值:

    表格 11-21 比較常數與描述

    常數 描述
    vbBinaryCompare 0 執行二進位比較
    vbTextCompare 1 執行文字比較

傳回值

StrComp 函式具有下列傳回值:

表格 11-22 StrComp 函式傳回值

如果 StrComp 會傳回
string1 小於 string2 -1
string1 等於 string2 0
string1 大於 string2 1

備註

下列範例使用 StrComp 函式來傳回字串比較的結果。如果第三個引數是 1,則會執行文字比較;如果第三個引數是 0 或省略,則會執行二進位比較。如果省略第三個引數,則會執行系統預設比較。

下列範例說明 StrComp 函式的用法:

範例 1

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd"   ' Define variables.
MyComp = StrComp(MyStr2, MyStr1)   
' Output: 1

MyComp = StrComp(MyStr1, MyStr2, 1)   
' Output: 0
MyComp = StrComp(MyStr1, MyStr2, 0)   
' Output: -1

範例 2

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD"
MyStr2 = "XYZ"
MyComp = StrComp(MyStr1, MyStr2)   
' Output: -1

範例 3

Dim MyStr1, MyStr2, MyComp
MyStr1 = "XYZ"
MyStr2 = "ABCD"
MyComp = StrComp(MyStr1, MyStr2)   
' Output: 1