如何判断一行文本内容中是否包含数字

凉薄骚年

如何判断一行文本内容中是否包含数字 源码 谢谢

liuqiyong

你不懂类型吗？ 整数型

Mr.Yang

  

子程序名	返回值类型	公开	备 注
文本_是否含数字	逻辑型		判断指定文本内是否含有数字,有则返回真;无则返回假
参数名	类 型	参考	可空	数组	备 注
欲查找文本	文本型

变量名	类 型	静态	数组	备 注
i	整数型
ASCII	整数型

计次循环首 (取文本长度 (欲查找文本), i)
ASCII ＝ 取代码 (欲查找文本, i)
如果真 (ASCII ≥ 48 且 ASCII ≤ 57)
返回 (真)

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

.版本 2<br /> <br /> .子程序 文本_是否含数字, 逻辑型, 公开, 判断指定文本内是否含有数字,有则返回真;无则返回假<br /> .参数 欲查找文本, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 ASCII, 整数型<br /> <br /> .计次循环首 (取文本长度 (欲查找文本), i)<br />     ASCII ＝ 取代码 (欲查找文本, i)<br />     .如果真 (ASCII ≥ 48 且 ASCII ≤ 57)<br />         返回 (真)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (假)

幻月工作室

正则测试，表达式：\d

难解

  

子程序名	返回值类型	公开	备 注
判断一段文本是否有数字	逻辑型		有则返回真 否则返回假
参数名	类 型	参考	可空	数组	备 注
欲查找的文本	文本型

变量名	类 型	静态	数组	备 注
特征	文本型		0
N	整数型

特征 ＝ { “0”, “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9” }
计次循环首 (取数组成员数 (特征), N)
如果真 (寻找文本 (欲查找的文本, 特征 [N], , 假) ≠ -1)
返回 (真)

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

.版本 2<br /> <br /> .子程序 判断一段文本是否有数字, 逻辑型, , 有则返回真 否则返回假<br /> .参数 欲查找的文本, 文本型<br /> .局部变量 特征, 文本型, , "0"<br /> .局部变量 N, 整数型<br /> <br /> 特征 ＝ { “0”, “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9” }<br /> .计次循环首 (取数组成员数 (特征), N)<br />     .如果真 (寻找文本 (欲查找的文本, 特征 [N], , 假) ≠ -1)<br />         返回 (真)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (假)

mrzcpo

简单粗暴  

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
文本	文本型
源文本	文本型

源文本 ＝ “va1s891ufas4hf23oqa19893feq”
文本 ＝ 文本_替换 (源文本, , , , “0”, “”, “1”, “”, “2”, “”, “3”, “”, “4”, “”)
文本 ＝ 文本_替换 (文本, , , , “5”, “”, “6”, “”, “7”, “”, “8”, “”, “9”, “”)
如果 (取文本长度 (文本) ＝ 取文本长度 (源文本))
调试输出 (“不包含数字”)



调试输出 (“包含数字”)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型<br /> .局部变量 源文本, 文本型<br /> <br /> 源文本 ＝ “va1s891ufas4hf23oqa19893feq”<br /> <br /> 文本 ＝ 文本_替换 (源文本, , , , “0”, “”, “1”, “”, “2”, “”, “3”, “”, “4”, “”)<br /> 文本 ＝ 文本_替换 (文本, , , , “5”, “”, “6”, “”, “7”, “”, “8”, “”, “9”, “”)<br /> <br /> .如果 (取文本长度 (文本) ＝ 取文本长度 (源文本))<br />     调试输出 (“不包含数字”)<br /> <br /> .否则<br /> <br />     调试输出 (“包含数字”)<br /> .如果结束

batcd

mrzcpo 发表于 2017-9-28 12:09
简单粗暴  

[e=1].版本 2

也是一种方法