GetLunarDate 函数
简介
将日期转换为中国农历（中文格式或数字格式）。
语法
GetLunarDate([Expression][, LunarDateFormat])
输入参数
| 参数名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| Expression | 可选 | Variant | 要转换的日期。缺省时默认使用操作系统当前日期。 |
| LunarDateFormat | 可选 | LunarDateFormatEnum | 返回的农历格式。缺省时默认使用 ldfTextDate。 |
返回值
无
说明
LunarDateFormatEnum 常量枚举说明
ldfNumberDate 标准yyyy-mm-dd格式，但是农历日期，如：2018-12-03
ldfTextDate 无阿拉伯数字的中文农历日期，如：农历戊戌(狗)年腊月初三
示例
Debug.Print GetLunarDate(#2018-06-01#, ldfNumberDate) '输出：2018-04-18 Debug.Print GetLunarDate(#2018-06-01#, ldfTextDate) '输出：农历戊戌(狗)年四月十八