以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  SQLquery 日期列格式  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=101313)
--  作者：ljh29206
--  发布时间：2017/5/28 9:26:00
--  SQLquery 日期列格式

代码如下

 

Dim cmd As new SQLCommand
cmd.Co nnecti

cmd.Co mmandText = " s elect * from ( s elect 货号 ,订单号,客户品番,箱数,出货时间,扫描数量,上传时间 , (箱数 - 扫描数量) as 扫描数与计划差  from 订单明细 where 出货时间 <  #" & Date.now & "# and 出货时间 >  #" & Date.now.AddDays(-10)   & "# ) as a  where 扫描数与计划差 <> 0"
Dim dt As DataTable
dt = cmd.ExecuteReader
dt.DataCols("上传时间").SetFormat(DateTimeFormatEnum.DateTime)
dt.DataCols("扫描时间").SetFormat(DateTimeFormatEnum.DateTime)

Tables("窗口1_table1").DataSource  = dt

 

 

显示的列格式 还是 date 格式    11/01/2017 

 

如果变为 datetime 格式   11/01/2017 08:30

[此贴子已经被作者于2017/5/28 9:27:07编辑过]
--  作者：ljh29206
--  发布时间：2017/5/28 9:35:00
--  

可以了 加载后 再设置

Tables("窗口1_table1").DataSource  = dt

Tables("窗口1_table1").Cols("上传时间").DataCol.SetDateTimeFormat(DateTimeFormatEnum.DatelongTime)
Tables("窗口1_table1").Cols("出货时间").DataCol.SetDateTimeFormat(DateTimeFormatEnum.DatelongTime)