vb.net - 使用无限拆分拆分 VB.NET 字符串

Question

在 VB.Net 中，如何按每个实数拆分字符串（数字和字母）。例如

1. 会员申请缺失 2.会员信用评分低 3.无收入申报

进入

1. 会员申请丢失
2. 会员信用评分低
3. 没有报告收入

Answer 1

    Dim source = "1. Membership application is missing 2. Members credit score is low 3. No reported income"

    Dim split = source.Split(New Char() {"1"c, "2"c, "3"c, "4"c, "5"c, "6"c, "7"c, "8"c, "9"c, "0"c})

    For i = 0 To split.GetUpperBound(0)
        If String.IsNullOrWhiteSpace(split(i)) Then
            Continue For
        End If
        Console.WriteLine("{0}. {1}", i, split(i).Trim("."c, " "c))
    Next

请注意，如果有超过 9 个项目（如果包含 10 个0），则会中断。实际上有很多方法可以打破这一点，但它们都不属于规范。