vb日期型数据的精确度是多少？

[imwinner]

如题，我用的是Date类型。现要将SQL 数据库中的一个DateTime类型的数值赋予VB中的Date类型。而DateTime类型的格式为 yyyy-mm-dd h-m-s，也就是说能精确到秒，而VB中的Date类型能否精确到秒？ 我用中断语句看了看Date类型变量的值，怎么只精确到日？如果从DateTime赋到Date去，回不会把h-m-s给丢失了？

[Andy__Huang]

VB的data類型只有到年月日﹐沒有時分秒

你先把sql server的datetime它赋到一個字符串變量中﹐然后再從變量中讀取時分秒

[霖湘凝]

转化成字符串，再用datetime和timevalue处理成具体的h或m或s

[Tiger_Zhao]

精确到秒的，用 Format(dt, "yyyy年mm月dd日 HH:MM:SS") 察看

[homezj]

“沒有時分秒”？
Date类型与Date函数要分清！
Date函数返回值是日期没有時分秒
但Date类型是8字节数据，前四字节为日期，后四字节为时间，精确到秒。

[homezj]

Date型变量，的确可以直接用“<”“=” 或 “>”进行比较。
其实Date型 与Double型存储方式是一致，所以数字可以直接与其进行转换，小数点前代表日期，小数点后为时间。

[lxcc]

Private Sub Command1_Click()
Dim d As Date
d = Now
MsgBox d
End Sub

[aohan]

Private Sub Command1_Click()
MsgBox Timer
End Sub

可以看到时间用秒级表示，并且到小数点后两位

[imwinner]

如果能精确到秒那最好了,也就是说我能比较同一天的两个不同时间段了?比如一个是2004-01-01 8:00:00 ,一个是2004-01-01 8:00:01 ,我把这两个日期值赋给2个DATE型变量TIME1和TIME2,那么在VB中就可以比较出TIME1<TIME2是吗??

[江语]

date & " " & time

[Cnxiaowei]

可以精确到秒
数据库里也是的
要不会发生不一致

[Tiger_Zhao]

Debug.Print CDate("2004-01-01 8:00:00")<CDate("2004-01-01 8:00:01")

[wooin]

VB的Date类型其实是一个16字节的double类型，整数部分是距离1900-01-01的天数，小数部分是这一天的时间，比如：
将浮点数
16.5
转换成日期就是
1900-01-16 12:00:00

解释：
整数部分：1900-01-01加16天当然就是1900-01-16了
小数部分：0.5是指一天24小数的0.5倍，当然就是中午12点了

所以，VB的Date类型可以支持“<”“=” 或 “>”，甚至“＋”“－”运算的
其实就是double类型

[行云边]

可以精确到秒的

直接 可以使用 < >= 来比较

[marke]

我也有相似的问题，看了大家的讨论，明白了不少，谢谢了。

[recollectpainer]

你用 now()