以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助动态增加日期列,去掉星期信息,麻烦各位老师了  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47033)

--  作者:zhengboxin
--  发布时间:2014/3/3 16:24:00
--  求助动态增加日期列,去掉星期信息,麻烦各位老师了

我用如下代码在窗体的表中动态增加了一列性质为日期的列:

DataTables("对账报表").DataCols.Add("日期", Gettype(DateTime))
Dim t As Table = Tables("对账报表")
For i As Integer = 0 To t.Rows.Count -1
Tables("对账报表").Rows(i)("日期") = Date.Today

Next

 

结果如下图:居然有星期,这样太难看了,如何去掉星期信息,麻烦各位老师了,谢谢

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140303162238.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2014-3-3 16:25:02编辑过]

--  作者:Bin
--  发布时间:2014/3/3 16:26:00
--  
说明你系统的日期格式就是带有星期几的.

解决方法如下
1.设置系统日期格式为正常格式
2.FORMAT一下日期格式    Tables("对账报表").Rows(i)("日期") = format(Date.Today,"yyyy-MM-dd")

--  作者:狐狸爸爸
--  发布时间:2014/3/3 16:29:00
--  
还有,交货日期这一列的数据类型,你没有设置为日期型?
--  作者:zhengboxin
--  发布时间:2014/3/3 16:29:00
--  
的确是这个原因,最近才用了win8,难怪,谢谢老师