MONTH

• 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgMonth
• 最后更新: 2016-03-13

---

从日期序列中获取月份

语法

declare function Month ( byval date_serial as double ) as long

用法

#include "vbcompat.bi"
result = Month( date_serial )

参数

date_serial

日期

返回值

从包含日期序列格式日期的变量中返回月份数字。

月份值范围为1-12，1代表一月，12代表十二月。

说明

除非包含 vbcompat.bi，否则编译器不会识别此函数。

示例

start GeSHi

#include "vbcompat.bi"

Dim a As Double = DateSerial(2005,11,28) + TimeSerial(7,30,50)

Print Format(a, "yyyy/mm/dd hh:mm:ss "); Month(a)

end GeSHi

与 QB 的差异

• QB 中不存在。此函数出现在 PDS 和 VBDOS 中。

另请参阅

• 日期序列

返回 目录