最直接的方法是使用StrComp函数,该函数可以用来比较两个字符串,并根据需要进行大小写敏感或大小写不敏感的比较。 示例代码 vba ' 使用StrComp函数进行大小写不敏感的比较 If StrComp(str1, str2, vbTextCompare) = 0 Then CompareStrings = True Else CompareStrings = False End If End Function TestCompareStrings...
StrComp(string1, string2[, compare]) StrComp 函数的语法有下面的命名参数: 部分 说明 string1 必要参数。任何有效的字符串表达式。 string2 必要参数。任何有效的字符串表达式。 Compare 可选参数。指定字符串比较的类型。如果 compare 参数是 Null,将发生错误。如果省略 compare,Option Compare 的设置将决定比较的...
StrComp函数的返回值为:如果String1<String2,则返回值为-1;如果String1=String2,则返回值为0;如果String1>String2,则返回值为1;如果String1或String2为Null,则返回值为Null。看看下面的示例: Sub testStringCompare() Dim MyStr1 As String, MyStr2 As String, MyComp1, MyComp2, MyComp3, MyComp4 MySt...
StrCompMDX only StrConvMDX only StringMDX only StrReverseNot supported SwitchMDX only SYDMDX only TabNot supported TanMDX only TimeNot supported TimerMDX only TimeSerialMDX only TimeValueDAX, MDX TrimDAX, MDX TypeNameMDX only UBoundNot supported ...
* You can use the LCASE function to return a text string with all the characters converted to lowercase.* You can use the STR function to return the text string of a number.* You can use the STRCOMP function to return the result of a string comparison.* You can use the STRREVERSE ...
如果String1 = String2, 那么StrComp函数返回0 如果String1 > String2, 那么StrComp函数返回1 语法 StrComp(string1,string2[,compare]) 1. Vb 参数说明 String1- 必需的参数。第一个字符串表达式。 String2- 必需的参数。第二个字符串表达式。 Compare- 一个可选参数。 指定要使用的字符串比较。它可以采用以...
We then check if the last character is a full stop using theStrCompfunction. If StrComp(LastChar, Chr(46), vbBinaryCompare) = 0 Then HereChr(46)is used to represent the full stop (.) character. This is the breakdown of whatChr(46)does: ...
StrComp函数的返回值为:如果String1<String2,则返回值为-1;如果String1=String2,则返回值为0;如果 String1>String2,则返回值为1;如果String1或String2为Null,则返回值为Null。 看看下面的示例: Sub testStringCompare() Dim MyStr1 As String, MyStr2 As String, MyComp1, MyComp2, MyComp3, MyComp4 ...
ReDim Arr(1 To ActiveWorkbook.Sheets.Count)For Each WS In ActiveWorkbook.SheetsB = TrueWithActiveWindow.SelectedSheetsForN =1To.CountB =TrueIfStrComp(WS.Name, .Item(N).Name, vbTextCompare) =0ThenB =FalseExitForEndIfNextNIfB =TrueThenK = K +1Arr(K) = ...
ii. StrComp(string1,string2,[compare]) 字符相似比较 如果string1小于string2返回 -1 大于 返回 1 等于 返回 0 String1或string2为null 返回 null iii. Strconv(string,conversion,LCID)字符串类型转换 Conversion第二个参数表示转换类型,根据不同参数可以转换9种类型的文本 ...