VB时间函数（VB6）

VB6 常用的时间函数以及计算方法

Now 获取系统当前时间（包括日期）

Time 获取系统当前时间
用于计时，Time 函数不是很精确，可以用API函数 GetTickCount()

截取日期的一部分：

year(T) 年份

month(T) 月份

day(T) 日

DatePart(datepart,T) 获取指定部分

datepart 取值（字符串，比如："yyyy"）：

y 一年中的天数

yyyy 年份

m 月

w 星期中的天，默认以星期天为第一天，数值1

ww 周

q 季度

d 一月中的天数

h 时

n 分

s 秒

时间计算函数

时间加减

DateAdd(datepart,number,date) 

number 是负数则是减去

如何计算2月份最后一天是几号？用3月1号减去一天：

DataAdd("d",-1,"2017-3-1")

计算两个日期的差值

DateDiff(datepart,date1,date2) 结果是date2-date1，负数表示date2比date1更小（日期更早）

格式化函数

Format(date,dateformat)

dateformat 参考 datepart，可以自由组合，比如"yyyy-mm"显示年月，"hh:mm"显示时分。分隔符横线和冒号可以自己指定，比如：

Format(now,"yyyy年mm月dd日")

显示的效果可能是（和操作系统设置有关）：2011年11月04日