29-11-19 09:54 AM
02-12-19 10:46 AM
For Each column as DataColumn in oDataTable.Columns If column.DataType = GetType(DateTime) then For i as Integer = 0 to oDataTable.Rows.Count-1: Dim dateObj as Object = Nothing dateObj = oDataTable.Rows(i).Field(Of Object)(column.ColumnName) If (dateObj <> Nothing) Then oDataTable.Rows(i)(column.ColumnName) = oDataTable.Rows(i).Field(Of DateTime)(column.ColumnName).ToLocalTime() End If Next end if Next
02-12-19 12:00 PM
02-12-19 04:54 PM