主题：[求助]一个字符串包含问题

设计了一个窗口，按钮的代码为：

dim s1 as string

dim brand() as string

brand(0)="a"

brand(1)-"b"

For Each dr As DataRow In DataTables("字符转换").Datarows
      s1=dr("转换字符")
      s1=s1.ToLower()
   For Index As Integer = 0 To brand.Length - 1
      If s1.Contains(brand(Index)) Then  

      dr("brand")=brand(index)
      End If
   Next
Next

 

    运行时出现错误：

 

 

    这里面有一句If s1.Contains(brand(Index)) Then ，我想问一下，这样写对不对？

此主题相关图片如下：未命名.jpg

改了，问题一样出现。

解决了。谢谢！