Foxtable(狐表)用户栏目专家坐堂 → 如何有规律的数据进行拆分


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

主题:如何有规律的数据进行拆分

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


加好友 发短信
等级:超级版主 帖子:112009 积分:570217 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/24 17:25:00 [显示全部帖子]

Dim s As String = "死亡1人,受伤-人,失踪22人"
Dim ss() As String = s.Split(",")
For Each a As String In ss
    Dim b As String = Left(a, 2)
    Dim c As String = a.Replace(b, "").Replace("人", "")
    Output.Show(b & "人数=" & c)
Next 

 回到顶部