Foxtable(狐表)用户栏目专家坐堂 → [求助]正则表达式求解


  共有3398人关注过本帖树形打印复制链接

主题:[求助]正则表达式求解

帅哥哟,离线,有人找我吗?
kylin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 F6
等级:狐精 帖子:3034 积分:19208 威望:0 精华:2 注册:2008/9/1 7:50:00
[求助]正则表达式求解  发帖心情 Post By:2022/2/22 14:36:00 [只看该作者]

Dim s As String="K金项链1520.33元,钻石戒指吊坠33441.99元,四九旧料-25250元-72.14克"
Dim p As String =  "(\d+\.?\d*)"  
Dim r As New System.Text.RegularExpressions.Regex(p)
Dim jg = System.Text.RegularExpressions.regex.replace(s,p,"=$1",RegexOptions.IgnoreCase)
Dim jg2 = jg.split(",")
For i As Integer = 0 To jg2.length-1
    output.Show(jg2(i))
Next

结果是:
K金项链=1520.33元
钻石戒指吊坠=33441.99元
四九旧料-=25250元-=72.14克

1、如何做到才能得到:
K金项链=1520.33元
钻石戒指吊坠=33441.99元
四九旧料=-25250元=-72.14克

2、如果这个表达是 如此
Dim s As String="K金项链1520.33元,钻石戒指吊坠33441.99元四九旧料-25250元-72.14克"

又要怎么做达到以上的要求?

菜鸟求助!图片点击可在新窗口打开查看

[此贴子已经被作者于2022/2/22 14:53:45编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
kylin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 F6
等级:狐精 帖子:3034 积分:19208 威望:0 精华:2 注册:2008/9/1 7:50:00
  发帖心情 Post By:2022/2/22 16:05:00 [只看该作者]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/22 16:10:00 [只看该作者]

1、

Dim p As String =  "(-\d+\.?\d*)"  

2、没有办法

 回到顶部
帅哥哟,离线,有人找我吗?
kylin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 F6
等级:狐精 帖子:3034 积分:19208 威望:0 精华:2 注册:2008/9/1 7:50:00
  发帖心情 Post By:2022/2/22 18:31:00 [只看该作者]

谢谢!

 回到顶部