Question

易语言怎么取出文本里的一组数字

易语言怎么取出文本里的一组数字而不打乱数字位置数字是不固定的，但是始终都有引号 例如：fsdfsd“12345”sdfsd“456789”sdfdfd“01232” 我想取的是12345 ，456789,1232 而不是123454567891232 。

Answer 1

.版本 2

.支持库 RegEx

.支持库 spec

.程序集 窗口程序集1

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

.子程序 _按钮1_被单击

.局部变量 文本, 文本型

.局部变量 表达式, 正则表达式

.局部变量 结果数组, 搜索结果, , "0"

.局部变量 i, 整数型

.局部变量 输出文本, 文本型

文本 ＝ 编辑框1.内容  ' 假设：编辑框1.内容为：fsdfsd“12345”sdfsd“456789”sdfdfd“01232”

表达式.创建 (#左引号 ＋ “([0-9]{1,})” ＋ #右引号, )

' 关于正则你还是要去多看一下相关文章。

' 在易中全角双引号要用常量 #左引号  #右引号

' 半角双引号要用常量：#引号 半角单引号要用常量：#单引号

结果数组 ＝ 表达式.搜索全部 (文本)

.计次循环首 (取数组成员数 (结果数组), i)

    调试输出 (结果数组 [i].取子匹配文本 (文本, 1, ))

    ' 将输出结果：

    ' * “12345”

    ' * “456789”

    ' * “01232”

    ' 你可以在此处理相关文本输出文，可以用逗号连起来或存入数组等。

.计次循环尾 ()

Answer 2

x = Replace("""12345"" sdfsd ""456789"" sdfdfd ""01232""", """", "")
For Each i In Split(x, " ")
If IsNumeric(i) = "1" Then Print i & ",";
Next
没学过易语言 这是vb代码仅供参考 看不看的懂我就没办法了

Answer 3

家我QQ我帮你解决 用最简单的方法190796515