MonthName
 
从其整体表示中获取一个月的名称

语法

Declare Function MonthName ( ByVal month As Integer, ByVal abbreviate As Integer = 0 ) As String

用法

#include "vbcompat.bi"
result = MonthName( month_number [, abreviate ] )

参数

month
一年中的月份数 - 1:1月至12月12日
abbreviate
标志表示该名称应该被缩写

返回值

将本地操作系统语言月份名称从month 值1返回到12。

说明


如果abbreviate 为真,则返回月名缩写。如果省略或者错误,则返回整个名称。

除非包含vbcompat.bidatetime.bi,否则编译器将无法识别此函数。

例子

#include "vbcompat.bi"

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

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


与QB差别

  • 在QB中不存在此函数出现在Visual Basic中。

参考