Foxtable(狐表)用户栏目专家坐堂 → 请问字符判断


  共有2165人关注过本帖树形打印复制链接

主题:请问字符判断

帅哥哟,离线,有人找我吗?
hbhb
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
请问字符判断  发帖心情 Post By:2016/11/11 13:14:00 [只看该作者]

下面的字符,如何判断为相似,abc,与 ab,bc,abcd,dabc,dbc,dab  就是连续两个以上字符相同就返回true?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110579 积分:562791 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/11 14:38:00 [只看该作者]

Dim s As String = "abc"
Dim ss() As String = {"ab","bc","abcd","dabc","dbc","dab","3454543534b34353c"}
For i As Integer = 0 To s.Length - 2
    For Each s2 As String In ss
        If s2.Contains(s.SubString(i,2)) Then
            Output.Show(s2)
        End If
    Next
Next

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2016/11/11 15:58:00 [只看该作者]

谢谢!有没有这样判断的类或函数?

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110579 积分:562791 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/11 16:48:00 [只看该作者]

参考2楼,自己做

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2016/11/11 17:02:00 [只看该作者]

这样是否基本上能去除掉非指定字符,有无其他好的方法?

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110579 积分:562791 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/11 17:28:00 [只看该作者]

或者可以考虑从源头上去解决问题。规范一下文档

 回到顶部