主题：[求助][求助] 如何在一个字段中显示另一个字段中是否包含关键字

参考代码

Dim str1 As String = "洗衣机,手机,电视机"
Dim str2 As String = "海尔洗衣机,iphone手机,华为手机,vivo手机,松下电视机,测试"
For Each s2 As String In str2.split(",")
    Dim flag As Boolean = False
    For Each s1 As String In str1.split(",")
        If s2.contains(s1)  Then
            flag = True
            Exit For
        End If
    Next
    If flag Then
        msgbox(s2 & "符合")
    Else
        msgbox(s2 & "不符合")
    End If
Next

 类别关键字，可以单独存放在一个表里面。

做一个关键字匹配表格吧。

【关键字】  【归类】

电脑            台式机

一体机         台式机

直接查这个表得到归类。

回复17楼，请好好看11楼的例子，都能匹配的啊。

具体问题做实例上来说明。

参考

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目4 (2).table