Foxtable(狐表)用户栏目专家坐堂 → 筛选出不含中文字符的行


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

主题:筛选出不含中文字符的行

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


加好友 发短信
等级:超级版主 帖子:109720 积分:558310 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/3/3 16:49:00 [显示全部帖子]

增加一列逻辑列,datacolchanged事件

If e.DataCol.Name = "第一列" Then '如果是已结帐列的内容变动
    If e.DataRow.IsNull("第一列") Then
        e.DataRow("逻辑列") = False
    Else
        Dim p2 As String = "[\u4e00-\u9fa5]"
        Dim r As New System.Text.RegularExpressions.Regex(p2)
        e.DataRow("逻辑列") = r.IsMatch(e.NewValue)
    End If
End If

然后筛选这样:
tables("表A").filter = "逻辑列=false"

 回到顶部