以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  如何分离字符与数值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126115)

--  作者：lihe60 --  发布时间：2018/10/14 21:42:00 --  如何分离字符与数值 年金643.8 医保1540.83 失业金404.33 公积金9704.7养老金5746.16 如何把上面这段字段串分解成下面五行两列的样式 年金              643.8 医保           1540.83 失业金        404.33 公积金        9704.7 养老金          5746.16

--  作者：有点甜 --  发布时间：2018/10/14 21:49:00 --   Dim str As String = "年金643.8 医保1540.83 失业金404.33 公积金9704.7养老金5746.16" For Each s As String In str.split(" ")     Dim mc = System.Text.RegularExpressions.Regex.Matches(s, "[0-9.]+")     Dim n = mc(0).value     s = s.replace(n, "")     msgbox(s)     msgbox(n) Next