通过代码生成一个临时表,其中”列2“为日期,格式为datelongtime,结果生成的日期是与系统一致,但时间总是00:00:00,不能与系统保持一致,请高手帮忙看一下。代码:
Dim dtb As New DataTableBuilder("test1")
dtb.AddDef("列1", Gettype(String), 32)
dtb.AddDef("列2", Gettype(Date))
dtb.AddDef("列3", Gettype(String), 17)
dtb.Build()
MainTable= Tables("test1")
Tables("test1").AddNew()
Tables("test1").Current ("列2") = Date.Now
DataTables("test1").DataCols("列2").SetDateTimeFormat(DateTimeFormatEnum.DatelongTime)
Tables("test1").Current ("列1") = Format(Tables("test1").Current ("列2"),"yyyyMMddhhMMss")
Tables("test1").Current ("列3") = "1" & Tables("test1").Current ("列1")
显示的结果时间总是0