[求助]字符串是否包含数组关键字 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

字符串中的关键字“根据.........之规定”，根据个人习惯会有不同的表述，比如：

依照、之规定

依据、规定

依、规定

据、之规定

...

我把上述关键字的组合放入表A的单元格中，每一组合为一行。

如果字符串包含单元格中的任意一个组合，就显示“true”。

请老师帮助修改一下代码。谢谢！

'''

Dim str As String = "根据《行政诉讼法》第三条第二款之规定"

Dim lst As New List(of String)

lst = Tables("表A").Current.DataRow.Lines("第一列")

For Each ls As String In lst

Dim ss() As String = ls.Split("、")

For i As Integer = 0 To ss.count - 1

If str.Contains(ss(i)) Then

msgbox（true）

Exit For

End If

此主题相关图片如下：截屏图片.jpg

主题：[求助]字符串是否包含数组关键字