以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  求助：判断某列字符包含某个字符，提示未知编辑错误。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92475)

--  作者：李孝春 --  发布时间：2016/11/4 10:31:00 --  求助：判断某列字符包含某个字符，提示未知编辑错误。 判断STR1  e.DataRow("第四列")内容包含“”https://mp.weixin.qq.com/s?__biz“”这个字符 下面是代码 提示未知编译出错     Case "转载"         If e.NewValue IsNot Nothing Then             Dim Str1 As String = e.DataRow("第四列")             If Str1.Contains("https://mp.weixin.qq.com/s?__biz")) =True  Then                 If e.DataRow("转载")="MzA4MjQ5MzIxNQ" Then                     e.DataRow("转载高检")=1                 End If                 If e.DataRow("转载")="MzA5ODQ3MDI2MA" Then                     e.DataRow("转载州院")=1                 End If                 If e.DataRow("转载")="MjM5OTgxMjAwOA" Then                     e.DataRow("转载省院")=1                 End If             End If         End If

--  作者：有点蓝 --  发布时间：2016/11/4 10:39:00 --   If Str1.Contains("https://mp.weixin.qq.com/s?__biz") =True  Then

--  作者：李孝春 --  发布时间：2016/11/4 11:05:00 --  回复：（有点蓝）If Str1.Contains("https://mp.weixi... 谢谢，疏忽了 ，居然多了一个) [此贴子已经被作者于2016/11/4 11:24:25编辑过]