请问VB数据库时间格式输出到excel文件怎么写?--急,在线等
gmsj是datetime字段,输出到excel如下边写法:
ex.Cells(hh, 3) = rs2("gmsj")
但是输出却不是时间,如2005-1-12格式,输出了什么37895,只出手工把excel格式属性改成时间才能显示出时间。
请问大家该如何写?
问题点数:20、回复次数:6Top
1 楼angel2000(angel2000)回复于 2005-01-11 17:16:14 得分 0
数据库是sqlserver2000,只能在“设置单元格格式”进行修改成“日期”才能显示正确日期,不知为何?怎么写Top
2 楼feifeilonglong(交友求知(河北))回复于 2005-01-11 17:26:27 得分 8
Range("B1").Select '指定输出的单元各
Selection.NumberFormatLocal = "yyyy""年""m""月""d""日"""‘设定格式Top
3 楼samwzhang(分全给我)回复于 2005-01-11 17:31:06 得分 5
ex.Cells(hh, 3) = format(rs2("gmsj"),"yyyy-mm-dd hh:mm:ss")Top
4 楼samwzhang(分全给我)回复于 2005-01-11 17:33:45 得分 5
if rs2.fields("gmsj").type=(时间格式的那个值,具体数字偶忘了,你自己试下吧) then
ex.Cells(hh, 3) = format(rs2("gmsj"),"yyyy-mm-dd hh:mm:ss")
else
ex.Cells(hh, 3) = rs2("gmsj")
end if
Top
5 楼liul17(溜溜)回复于 2005-01-11 17:52:10 得分 1
以下语句在设定 指定单元格的格式
Ex.Sheets(1).Range("A1").NumberFormatLocal = "yyyy-mm-dd"Top
6 楼ryuginka(一米八五的猪)回复于 2005-01-11 19:20:47 得分 1
ex.Cells(hh, 3) = format(rs2("gmsj"),"yyyy-MM-dd HH:mm:ss")
Top




