前言

在《VB/VBA/VBS内置函数有哪些？》中，从分类和具体名称上，给大家介绍了VB/VBA/VBS内置的函数集。并着重强调了一些高阶应用中会经常使用的函数，比如后缀带B的，如ChrB,LeftB,MidB,RightB,AscB,LenB,InstrB等，转换函数中的Fix和Val，数学函数中的Rnd,Randomize和Round，字符串函数中的Filter,Instr,InstrRev,Join,Split，日期函数中的DateDiff，其他如Environ,Format,Strconv,CreateObject,GetObject,Shell等。

有网友希望能专题讲下这些函数，恰好这些函数又算是笔者后续VB系列技术文章基础中的基础，再加之网上相关介绍比较少，或者不怎么详细，所以笔者就挑选一些出来，做成一个内置函数系列给大家。

不过，这个系列，还是从VB/VBA/VBS规范使用的角度进行介绍，等后续高阶应用阶段，再从指针的角度（也即图形化的C和安全的C）进行回顾，让VB/VBA/VBS的爱好者们，真正体会VB的强大，欢迎持续关注。

一、认识日期格式

日期类型，在VB/VBA/VBS中为Date类型，而Date类型在WTYPES.H中被定义为"typedef double DATE;"，因此Date类型实际上为Double类型。笔者在《知VBA的浮点数结构，更懂算力》一文中有详细介绍，可点击查阅。

Double类型，占8字节，15位有效小数。由1Bit符号位、11Bits指数位和52Bits有效数位三部分组成，在内存里可视为1个整数，结构与Single类似。按照IEEE(美国电气和电子工程师学会)的标准，与十进制转换公式为：l= (-1)^s * (1 + f) * 2^(e - 1023)。

在实际使用过程中，VB/VBA/VBS为了提高容错率，对小白们尽可能友好，几乎所有的内置函数的参数和返回值，都使用了Variant类型。在今天要介绍的DateDiff函数中，日期参数也是如此，数据存放在第9-16字节中，而数据类型存放在第1-2字节里。

注：VBS中仅有Variant类型，因此很多人认为VBS没有数据类型，其实是不正确的。感兴趣的朋友，可以点击参阅《VB的任性，从Variant开始》《VB的天地，横看成岭侧成峰》《VB/VBA中Variant不仅是容器，充当传参的Any，更可以当函数用哦》等文章，对Variant及其应用，有较为详细的分析。

二、DateDiff函数语法

1、函数功能

该函数为时间减法函数，计算两个日期之间的间隔时间。

2、函数的定义（VB形式）

DateDiff(Interval As String,Date1 As Variant,Date2 As Variant,Optional ByVal FirstDayOfWeek As VbDayOfWeek=vbSunday,Optional ByVal FirstWeekOfYear As VbFirstWeekOfYear=vbFirstJan1) As Variant

3、函数参数说明

Interval为时间间隔单位，也即DateDiff返回值的时间单位，具体为下图所示：

Date1为时间减法运算中的被减数，不仅支持Date类型和Double类型表示的时间，也支持字符串表示的时间（如"1899-12-30 0:00:00"）。

Date2为时间减法运算中的减数，其余同Date1。

FirstDayOfWeek为1周中第1天从星期几开始，默认从星期天开始

FirstWeekOfYear为1年中第1月从星期几开始，默认从1月开始

三、DateDiff函数应用

既然DateDiff是用来进行时间减法运算的，那计算两个时间之差，就是该函数主要应用场景，例如：

1、计算两个日期之间有几年，几个季度，几个月，几周等，在财会行业中通常用于计算应收账期计提坏账。

2、计算两个时间之间有多少个小时、分钟或秒，在按时计费等相关领域，可大显身手。

3、计算指定月度、季度或年度天数，比如2034年有多少天，当前月天数等。

4、计算UNIX时间戳，将8字节Date/Double类型转换4字节Long类型。

事实上，该函数可以应用的场景非常多，在后续文章中会结合具体应用，再做介绍，欢迎关注！

欢迎关注BtOfficer（收藏、点赞、关注+转发）,更多精彩仍在继续哦（专栏文章将更系统，更全面，但需要阁下支持哦），有严肃的技术，也有轻松的唠嗑，期待你的加入！