判断

zys666

就有一段文本，我把它分割了之后，我要筛选出来

[]中得文本，不包含英文、数字、中文就留下，反之就给他删掉

但是要怎么判断这段文本中没有英文、数字、中文呢

求助

算法艺术家

你可以参考下之前大佬写的 区分方法

  

子程序名	返回值类型	公开	备 注
文本_取特定类型	文本型		取出特定的中文、英文、数字、标点符号，
参数名	类 型	参考	可空	数组	备 注
文本参数	文本型
保留中文	逻辑型
保留英文	逻辑型
保留数字	逻辑型
保留标点	逻辑型

变量名	类 型	静态	数组	备 注
n	整数型
Asc	整数型
i	整数型
length	整数型
strRet	文本型
bRet	逻辑型

length ＝ 取文本长度 (文本参数)
循环判断首 ()
Asc ＝ 取代码 (文本参数, i)
bRet ＝ 假
如果真 (Asc ＜ 0)
Asc ＝ 256 ＋ Asc
如果 (Asc ＜ 127)
n ＝ 1
判断 (Asc ＞ 96 且 Asc ＜ 123)  ' a-z   97-122
bRet ＝ 保留英文
判断 (Asc ＞ 64 且 Asc ＜ 91)  ' A-Z   65-90
bRet ＝ 保留英文
判断 (Asc ＞ 47 且 Asc ＜ 58)  ' 0-9   48-57
bRet ＝ 保留数字
bRet ＝ 保留标点

n ＝ 2
bRet ＝ 保留中文
如果真 (bRet)
strRet ＝ strRet ＋ 取文本中间 (文本参数, i, n)
i ＝ i ＋ n
循环判断尾 (i ≤ length)
返回 (strRet)

.版本 2<br /> <br /> .子程序 文本_取特定类型, 文本型, 公开, 取出特定的中文、英文、数字、标点符号，<br /> .参数 文本参数, 文本型<br /> .参数 保留中文, 逻辑型<br /> .参数 保留英文, 逻辑型<br /> .参数 保留数字, 逻辑型<br /> .参数 保留标点, 逻辑型<br /> .局部变量 n, 整数型<br /> .局部变量 Asc, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 length, 整数型<br /> .局部变量 strRet, 文本型<br /> .局部变量 bRet, 逻辑型<br /> <br /> length ＝ 取文本长度 (文本参数)<br /> .循环判断首 ()<br />     Asc ＝ 取代码 (文本参数, i)<br />     bRet ＝ 假<br />     .如果真 (Asc ＜ 0)<br />         Asc ＝ 256 ＋ Asc<br />     .如果真结束<br />     .如果 (Asc ＜ 127)<br />         n ＝ 1<br />         .判断开始 (Asc ＞ 96 且 Asc ＜ 123)  ' a-z   97-122<br />             bRet ＝ 保留英文<br />         .判断 (Asc ＞ 64 且 Asc ＜ 91)  ' A-Z   65-90<br />             bRet ＝ 保留英文<br />         .判断 (Asc ＞ 47 且 Asc ＜ 58)  ' 0-9   48-57<br />             bRet ＝ 保留数字<br />         .默认<br />             bRet ＝ 保留标点<br />         .判断结束<br /> <br />     .否则<br />         n ＝ 2<br />         bRet ＝ 保留中文<br />     .如果结束<br />     .如果真 (bRet)<br />         strRet ＝ strRet ＋ 取文本中间 (文本参数, i, n)<br />     .如果真结束<br />     i ＝ i ＋ n<br /> .循环判断尾 (i ≤ length)<br /> 返回 (strRet)

星马豪

用 文本区分_只取汉字 这个命令，只取汉字后，和原来的变量判断下是否相等，相等就说明只有汉字。数字、英文一样用法，根据自己需要使用不同的文本区分

b0y

循环判断ASC码  或者正则表达式匹配

心安理得

.版本 2

.程序集 窗口程序集_启动窗口
.子程序 _启动窗口_创建完毕

.子程序 筛选文本
    .参数 文本, 文本型
    .局部变量 结果, 文本型
    .局部变量 i, 整数型
    .局部变量 字符, 文本型
    .局部变量 是否保留, 逻辑型

    结果 ＝ “”
    .计次循环首 (取文本长度 (文本), i)
        字符 ＝ 取文本中间 (文本, i, 1)
        是否保留 ＝ 真

        ' 判断是否为英文
        .如果真 (字符 ≥ “a” 且 字符 ≤ “z” 或 字符 ≥ “A” 且 字符 ≤ “Z”)
            是否保留 ＝ 假
        .如果真结束

        ' 判断是否为数字
        .如果真 (字符 ≥ “0” 且 字符 ≤ “9”)
            是否保留 ＝ 假
        .如果真结束

        ' 判断是否为中文（Unicode范围）
        .如果真 (取代码 (字符, ) ≥ 19968 且 取代码 (字符, ) ≤ 40869)
            是否保留 ＝ 假
        .如果真结束

        ' 如果字符不是英文、数字、中文，则保留
        .如果真 (是否保留)
            结果 ＝ 结果 ＋ 字符
        .如果真结束
    .计次循环尾 ()

    返回 (结果)

.子程序 _按钮_筛选_被单击
    .局部变量 原始文本, 文本型
    .局部变量 筛选后文本, 文本型

    原始文本 ＝ 编辑框_原始文本.内容
    筛选后文本 ＝ 筛选文本 (原始文本)
    编辑框_筛选后文本.内容 ＝ 筛选后文本

cunanhai

正则 里有取中文  英文 数字