Dim idx As Integer = DataTables("表A").DataCols("第七列").DateTimeFormat
0 date
1 time
2 longtime
3 datetime
4 datelongtime