下面代码短时间显示为“00:00”,如何处理?
'=======增加临时代理开标记录数据表=========
Dim dtb As New DataTableBuilder("标录明细水平表")
dtb.AddDef("系统编号", Gettype(String), 30)
dtb.AddDef("项目名称", Gettype(String), 200)
dtb.AddDef("开标日期", Gettype(Date))
dtb.AddDef("开标时间", Gettype(Date))
dtb.AddDef("中标基准价", Gettype(Double))
For Each tbdw As String In tb6.DataTable.GetValues("投标单位")
dtb.AddDef(tbdw, Gettype(Double))
Next
tb5.DataSource = dtb.BuildDataSource()
tb5.DataTable.DataCols("开标时间").SetDateTimeFormat(DateTimeFormatEnum.Time)