VBA比较StringArray（）元素和String

我正在编写一个小的VBA程序，需要根据string的第一个单词是“The”还是“the”来做两件不同的事情。 到目前为止，我有这个，但它不符合他们。

Sub Venues() Dim masterFile As Workbook Set masterFile = ActiveWorkbook Dim venueSplitArray() As String Dim tempString As String venueSplitArray() = Split(masterFile.Sheets(Week).Cells(I, "E")) tempString = venueSplitArray(0) If StrComp(tempString = "The", 1) And StrComp(tempString = "the", 1) Then ''''''CODE''''' Else ''''''CODE''''' End If End Sub 

但这不是为我工作，总是返回string不匹配。

Answer 1

如果你想接受“The”或“the”，那么使用：

 If StrComp(tempString, "The", vbTextCompare) Then 

如果你想区分“The”和“the”，那么使用：

 If StrComp(tempString, "The", vbBinaryCompare) Then