Question

我正在操纵具有大量出生日期的xml。 XML已经加载到datatable上。我们需要的格式是“dd / MM / yyyy”日期很混乱，例如“dd-MM-yyyy”或“dd.MM.yyyy”，所以我想写一个能在一组预定义上自动纠正的功能分隔符格式正确。所以我想做这样的事情_

但当然，这不会只是工作..我不能使用替换来替换数组。如果我能做到这一点，一切都会好的。希望有人可以指出一个方法。谢谢你这么多。

Dim str As String = ""
Dim keywords() As String = {"-", "_", ".", "\"}

For Each x In dt.Rows
    str = x("DOB")
    If keywords.Contains(str) Then
        str = str.Replace(keywords, str)
    End If
Next

Answer 1

这就是为什么我使用了这种文化，然后我的问题就解决了..

Imports System.Globalization
Imports System.Threading

blah..blah..blah..

Threading.Thread.CurrentThread.CurrentCulture = New System.Globalization.CultureInfo("en-GB", False)

Answer 2

我得到了它...感谢大家的帮助..希望它对其他人也有用..

    Public Function arrayReplace(ByVal dt As DataTable) As DataTable

    Dim str As String = ""
    Dim sep As String() = {"-", "_", ".", "\", "'"}
    For Each x In dt.Rows
        For i As Integer = 0 To Old.Length - 1
            str = x("DOB").Replace(sep(i), "/")
            x("DOB") = str
        Next
    Next
    Return dt

    End Function

自动更正日期格式STRING“dd / MM / yyyy”

2 个答案: