第1个回答 推荐于2016-08-23
用 计次循环首 然后找数字即可,代码如下:
.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.计次循环首 (10, i)
.如果 (寻找文本 (编辑框1.内容, 到文本 (i), , 假) ≠ -1)
调试输出 (“假”)
结束 ()
.否则
.如果结束
.计次循环尾 ()
调试输出 (“真”)
结束 ()
第2个回答 推荐于2016-01-29
.版本 2
.如果真 (文本是否是纯数字 (编辑框1.内容))
信息框 (“输入” + 编辑框1.内容, 0, )
.子程序 文本是否是纯数字, 逻辑型
.参数 文本, 文本型
.局部变量 循环次数, 整数型
.局部变量 文本部分, 文本型
.局部变量 i, 整数型
.局部变量 a, 逻辑型
.计次循环首 (取文本长度 (文本), 循环次数)
文本部分 = 取文本中间 (文本, 循环次数, 1)
.计次循环首 (10, i)
.如果 (文本部分 = 到文本 (i))
a = 真
跳出循环 ()
.否则
a = 假
.如果结束
.计次循环尾 ()
.如果真 (a = 假)
跳出循环 ()
.如果真结束
.计次循环尾 ()
返回 (a)本回答被提问者采纳