VB.NET实现空格分隔字符串分割、去首尾空格及日期时间拆分

修正后的完整代码 #

Module Module1
    Sub Main()
        Dim s As String = "     5010    2024-03-18 06:59:10 1   0   0   0"
        ' 按多空格分割，自动移除空元素
        Dim splitParts As String() = s.Split(New Char() {" "c}, StringSplitOptions.RemoveEmptyEntries)
        Dim resultList As New List(Of String)
        
        For Each part As String In splitParts
            Dim trimmedPart As String = part.Trim()
            ' 识别日期时间组合格式（含空格且长度匹配yyyy-MM-dd HH:mm:ss）
            If trimmedPart.Contains(" ") AndAlso trimmedPart.Length = 19 Then
                ' 拆分为日期和时间两个独立元素
                Dim dateTimeSegments As String() = trimmedPart.Split(" "c)
                resultList.Add(dateTimeSegments(0))
                resultList.Add(dateTimeSegments(1))
            Else
                resultList.Add(trimmedPart)
            End If
        Next
        
        ' 按期望格式输出
        For Each word As String In resultList
            Console.WriteLine("WORD: {0}", word)
        Next
        Console.Read()
    End Sub
End Module

关键处理步骤说明 #

• 替换分割逻辑：原代码用vbTab分割，但目标字符串是多空格分隔，改用Split(New Char() {" "c}, StringSplitOptions.RemoveEmptyEntries)，既把连续空格作为单一分隔符，又自动过滤分割产生的空字符串。
• 清除首尾空格：对每个分割后的元素调用Trim()，彻底消除前后冗余空格。
• 拆分日期时间：通过元素的格式特征（包含空格、长度为19）识别日期时间组合，将其拆分为日期和时间两个独立项，确保输出符合预期结构。

内容的提问来源于stack exchange，提问作者roy