请问判断文件名是否英文

Battlefield4

比如说文件名可能包含中文英文，怎么判断文件名是不是全英文呢


补充内容 (2021-2-4 16:07):
好吧 换一个问题 怎么判断文本中是否包含汉字

ErrorCodes

看一下： Demo.e (135.8 KB, 下载次数: 5)

2021-2-4 16:09 上传

点击文件名下载附件

sunsir

文本_取汉字 能取到就是混合 取不到就是英文~

Battlefield4

sunsir 发表于 2021-2-4 15:56
文本_取汉字 能取到就是混合 取不到就是英文~

如果文件名包含其他语言呢 比如日文 俄文

sunsir

Battlefield4 发表于 2021-2-4 15:57
如果文件名包含其他语言呢 比如日文 俄文

那分割文件名逐字判断有一个不为英文即不全英文~

ErrorCodes

  

子程序名	返回值类型	公开	备 注
判断是否有中文	逻辑型		返回假代表没有中文，返回真代表有中文
参数名	类 型	参考	可空	数组	备 注
text	文本型

变量名	类 型	静态	数组	备 注
wordByWordArrs	文本型		0
i
flag	逻辑型
asciiCode	整数型

flag ＝ 假
文本_逐字分割 (text, wordByWordArrs)
调试输出 (wordByWordArrs)
计次循环首 (取数组成员数 (wordByWordArrs), i)
asciiCode ＝ 取代码 (wordByWordArrs [i], )
' 调试输出 (asciiCode)
如果真 (asciiCode ＜ 0 或 asciiCode ＞ 126)
flag ＝ 真
跳出循环 ()

计次循环尾 ()
返回 (flag)

子程序名	返回值类型	公开	备 注
文本_逐字分割	整数型		将给定的指定文本,逐字分割出来,目前只支持半角格式[V雪落有声V],支持换行符，由论坛用户[CakeEternal ]修改
参数名	类 型	参考	可空	数组	备 注
文本	文本型				需要取出来的汉字
返回的数组	文本型				保存取出结果的数组变量

变量名	类 型	静态	数组	备 注
A	整数型
V	文本型
C	整数型
D	整数型
E	文本型
F	整数型

A ＝ 1
E ＝ 到半角 (文本)
重定义数组 (返回的数组, 假, 取文本长度 (E))
判断循环首 (A ≤ 取文本长度 (E))
V ＝ 取文本中间 (E, A, 1)
C ＝ 取代码 (V, )
如果真 (C ＝ 13)
如果真 (取代码 (取文本中间 (E, A ＋ 1, 1), ) ＝ 10)
V ＝ #换行符
A ＝ A ＋ 1

如果真 (C ＜ 0)
V ＝ 取文本中间 (E, A, 2)
A ＝ A ＋ 1
F ＝ F ＋ 1
返回的数组 [F] ＝ V
A ＝ A ＋ 1
判断循环尾 ()
重定义数组 (返回的数组, 真, F)
返回 (取数组成员数 (返回的数组))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 判断是否有中文, 逻辑型, , 返回假代表没有中文，返回真代表有中文<br /> .参数 text, 文本型<br /> .局部变量 wordByWordArrs, 文本型, , "0"<br /> .局部变量 i<br /> .局部变量 flag, 逻辑型<br /> .局部变量 asciiCode, 整数型<br /> <br /> flag ＝ 假<br /> 文本_逐字分割 (text, wordByWordArrs)<br /> 调试输出 (wordByWordArrs)<br /> .计次循环首 (取数组成员数 (wordByWordArrs), i)<br />     asciiCode ＝ 取代码 (wordByWordArrs <i>, )<br />     ' 调试输出 (asciiCode)<br />     .如果真 (asciiCode ＜ 0 或 asciiCode ＞ 126)<br />         flag ＝ 真<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> 返回 (flag)<br /> <br /> <br /> .子程序 文本_逐字分割, 整数型, 公开, 将给定的指定文本,逐字分割出来,目前只支持半角格式[V雪落有声V],支持换行符，由论坛用户[CakeEternal ]修改<br /> .参数 文本, 文本型, , 需要取出来的汉字<br /> .参数 返回的数组, 文本型, 参考 可空 数组, 保存取出结果的数组变量<br /> .局部变量 A, 整数型<br /> .局部变量 V, 文本型<br /> .局部变量 C, 整数型<br /> .局部变量 D, 整数型<br /> .局部变量 E, 文本型<br /> .局部变量 F, 整数型<br /> <br /> A ＝ 1<br /> E ＝ 到半角 (文本)<br /> 重定义数组 (返回的数组, 假, 取文本长度 (E))<br /> .判断循环首 (A ≤ 取文本长度 (E))<br />     V ＝ 取文本中间 (E, A, 1)<br />     C ＝ 取代码 (V, )<br />     .如果真 (C ＝ 13)<br />         .如果真 (取代码 (取文本中间 (E, A ＋ 1, 1), ) ＝ 10)<br />             V ＝ #换行符<br />             A ＝ A ＋ 1<br />         .如果真结束<br /> <br />     .如果真结束<br />     .如果真 (C ＜ 0)<br />         V ＝ 取文本中间 (E, A, 2)<br />         A ＝ A ＋ 1<br />     .如果真结束<br />     F ＝ F ＋ 1<br />     返回的数组 [F] ＝ V<br />     A ＝ A ＋ 1<br /> .判断循环尾 ()<br /> 重定义数组 (返回的数组, 真, F)<br /> 返回 (取数组成员数 (返回的数组))

汉族

取代码（）