在Visual Basic中检查特定字符时无效的限定符

嗨，我想检查视觉vba中的特定字符，但我遇到“无效QUALIFIER”错误，当我运行我的代码。

这是我的代码：

For i = LBound(rtv) To UBound(rtv) - 1 If rtv(i).Contains(":") Then Value = Split(rtv(i), ":") rtv(i) = Chr(34) & Value(0) & Chr(34) & ":" & Chr(34) & Value(1) & Chr(34) & ";" Else rtv(i) = Chr(34) & rtv(i) & Chr(34) & ":" & Chr(34) & Chr(34) ' rtv(i) = Chr(34) & rtv(i) & Chr(34) & ":" & Chr(34) & Chr(34) & ";" Next i 

错误在于IF语句的条件，但我不知道我在这里做错了什么。 任何帮助？

Answer 1

正如注释中所述， rtv(i).Contains()将不起作用。 数组没有可以用这种方法的函数或属性。

用这个代替：

 If InStr(rtv(i),":") > 0 Then