Question

只是一个例子，以便更清楚。

让我们说我们在数组中将其指定为字符串：

a(1) = Blue
a(2) = Red
a(3) = Orange

然后，您要在数组中找到的字符串是＆＃34;或＆＃34;

然后我会像这样编写部分内容：

word = "Or"
i = 1
j = 1
For a(i) to 3
if instr(a(i),word,1) <>0 Then
b(j) = a(i)
j = j + 1
end if
next i

这是输出意图。我实际上知道哪个数组 - 在这种情况下，数组（3）包含单词＆＃34;或＆＃34;。这是我想要的输出。

我在使用instr函数时遇到问题，因为它没有识别数组中的字符串值，甚至不识别变量中的字符串。我想知道是否有另一种方法可以在不加入数组中的字符串然后在以后分隔它。

Answer 1

我不确定您提供的代码，因为如果对我来说看起来像语法错误。

所以我写了一段符合你需求的代码。希望它可以提供帮助。

Dim a(3) As String

a(0) = "Blue"
a(1) = "Red"
a(2) = "Orange"

Dim word As String

word = "Or"

Dim i As Integer

For i = LBound(a) To UBound(a)
    If InStr(a(i), word) Then
        Debug.Print "found at index " + CStr(i) + " : "; a(i)
    End If
Next

如何在字符串数组中搜索字符串

1 个答案: