月の整数表現から、月の名前を得ます。
構文:
用法:
#include "vbcompat.bi"
result = MonthName
( month_number [, abreviate ] )
パラメタ:
month
年の中の、月の数 - 1:1月 〜 12:12月
abbreviate
名前(月)を省略表示する指定。
指定しないか「0(false)」の場合は 1月〜12月と表示され、「1(true)」を指定すると 1〜12と表示されます。
戻り値:
month の値 1 〜 12 から、地域のオペレーティング・システム言語の月の名を返します。
記述:
abbreviate を、「1(true)」にすると、「月」の表示を省略して返します。
この指定を省略するか、または誤っていると、「月」を付けた全体表示になります。
例:
#include
"vbcompat.bi"
Dim ds
As Double =
DateSerial(2005,
11,
28) +
TimeSerial
(7,
30,
50)
Dim i
As Integer
Print Format(ds,
"yyyy/mm/dd hh:mm:ss ");
MonthName(Month(ds
))
Print
Print Format(
Now(),
"今は yyyy/mm/dd hh:mm:ss ");
MonthName(Month(
Now()),1)
Print
For i=1
To 12
Print MonthName(i
)
Next
Sleep
結果は以下のようになります。
QB からの違い:
- QB では、存在しませんでした。
この関数は Visual Basic で現れました。
参照: