189 8069 5689
日期时间数据在电脑中就是以一个双精度浮点数的形式存在的，其整数部分代表1899年12月31日到这个日期的天数，小数部分则是这个时间在全天24小时中所处的百分比，这样通过这个浮点数就能表示任何的时间了。而VB为了让你看得明白，会自动把这个浮点数解析为2014/4/29 15:44:05这样的形式。换句话说，站在电脑的角度，它是不知道有“日期时间”这样的数据类型的，它的眼里就是一个双精度浮点数，明白没有？
创新互联是一家专注于网站制作、做网站与策划设计,金山网站建设哪家好?创新互联做网站,专注于网站建设10多年,网设计领域的专业建站公司;建站业务涵盖:金山等地区。金山做网站价格咨询:028-86922220
你也可以自己在VB的立即窗口验证一下的，比如你可以把Now用CDbl函数强制转换为双精度浮点数：
?now '显示当前时间
2015/11/11 21:14:18
?cdbl(now) '转为双精度浮点数
42319.8850462963
Now是可以直接参与数学运算的，这也说明它本身就是个数值，比如：
?now+1 '当前时间增加一天
2015/11/12 21:14:35
?now+0.5 '当前时间增加半天
2015/11/12 9:14:53
?now-1/24 '当前时间减去一个小时
2015/11/11 20:15:14
Now是个日期类型(Date)的变量，占用8个字节，你必须这样定义：
Dim 临时时间(500) As Date
临时时间(0) = Now
临时时间(1) = Now
转换成字符型也很容易：
MsgBox(Now.ToString)
1、now()的返回值包括年-月-日 时-分-秒
2、从now()取小时可以使用hour(now)
3、从now()取小时还可以使用format(now,"HH")或format(now,"hh")
4、取系统时间小时还可以用format(time,"HH")或format(time,"hh")或hour(time)
5、示例：
dim H
H=hour(now)
H=format(now,"HH")
时间字符串中含有特殊字符串（比如斜杠/和冒号:），不能直接用作文件名，必须把特殊字符去掉（或替换为合法字符）才行，比如：
fname = Format(Now, "yyyymmddhhnnss")
注意，表示分钟的格式符为nn，不是mm（月份才是mm）