以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  日期格式转换为数字类型  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=76445)

--  作者:307587760
--  发布时间:2015/10/29 11:13:00
--  日期格式转换为数字类型
请教各位老师:我想把当天日期转换为数值格式类型的,请问该如何转换
比如:2015/10/29 11:10:22 转换为对应的数字,比如说42306.4655324074
[此贴子已经被作者于2015/10/29 11:14:13编辑过]

--  作者:大红袍
--  发布时间:2015/10/29 11:15:00
--  

比如

 

msgbox(format(date.now, "yyyyMMddHHmmss"))


--  作者:大红袍
--  发布时间:2015/10/29 11:19:00
--  

或者

 

Dim d As Double = Date.now.Ticks
msgbox(d)
Dim dt As Date = new DateTime(d)
msgbox(dt)


--  作者:307587760
--  发布时间:2015/10/29 11:22:00
--  
请问这样怎么就不行了呢?我想得到的是带时分秒的信息呢


Dim cmd As New SQLCommand
Dim dt As Date
cmd.C
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
Dim d As Double = dt
msgbox(d)

--  作者:大红袍
--  发布时间:2015/10/29 11:25:00
--  
Dim d As Double = dt.ticks
msgbox(d)

--  作者:307587760
--  发布时间:2015/10/29 12:46:00
--  
可用,谢谢