主题：[求助]请教导入文本后如何将字符型数据转换成时间日期型

新建一个日期列，在命令窗口执行：

For Each dr As DataRow In DataTables("表A").DataRows
    Dim v As String = dr("原来的列")
    If v.Length >=8 Then
        dr("新的列") = v.SubString(0,4) & "-" & v.substring(4,2) & "-" & v.substring(6,2)
    End If
Next