DatePart関数

2539 ワード

DatePart関数
 
適用先:
Microsoft Office Access 2007
 
すべて表示
すべてを隠す
指定された日付の指定部分を含む変数型を返します。
構文
DatePart(interval,date[,first dayoffek][,first weekofyear])
DatePart関数の文法は以下のパラメータを含みます。 (パラメータ:操作、イベント、方法、属性、関数またはプロセスに関する情報の値を提供します。)
パラメータ
説明
インターバール
必ず選ぶ。文字列表式 (文字列表式:任意の値は連続文字の表式です。表式の要素は、文字列または文字列VarType 8の関数を返します。文字列の文字列の値、定数、変数またはVarantを返します。)戻りたい時間間隔を表します。
ダテ
必ず選ぶ。計算する変数型(日付型)の値。
first days offek
オプション。定数 (定数:計算されていない値は変化しません。たとえば、数字210およびテキスト「四半期ごとの収入」は定数です。表式および表式によって生成される値はすべて定数ではありません。)1週間の最初の日を指定します。指定しない場合は、デフォルトは日曜日です。
firstweekofyear
オプション。定数は、1年の最初の週を指定します。指定されていない場合は、最初の週は1月1日の週としてデフォルトです。
設定
intervalパラメータ (パラメータ:操作、イベント、方法、属性、関数またはプロセスに関する情報の値)は、以下の設定を含みます。
設定
説明
yyy

q
四半期
m

y
ある年のある日
d

w
平日
ww
週間
h
時刻
n
ポイント
s

first days offekパラメータは、以下の設定を含む。
定数

説明
vbUseSystem
0
NLS API設定を使用します。
vbSunday
1
日曜日(デフォルト)
vbMondy
2
月曜日
vbTuesday
3
火曜日
vbWedness day
4
水曜日
vbThursday
5
木曜日
vbFriday
6
金曜日
vbSaturday
7
土曜日
firstweekofyearパラメータは以下の設定を含みます。
定数

説明
vbUseSystem
0
NLS API設定を使用します。
vb First Jan 1
1
1月1日の週から(デフォルト)。
vbFirst FourDays
2
少なくとも新年を含めて4日間の初週から始まります。
vbFirst FullWeek
3
一年の最初の週から始まります。
注釈
DatePart関数を使用して日付を計算し、特定の時間間隔を返します。例えば、DatePartを使用して、一週間の数日目または現在の時間を計算することができる。
firstdaysoweekパラメータは、「w」と「ww」の間隔記号を使用した計算に影響を与えます。
日付テキストがdateであれば (日付テキスト:有効な書式を持つ任意の文字列は、両方を番号記号(((((嚔)で囲まれます。有効な書式は、コードの範囲によって指定された日付書式または共通の日付書式が設定されます。)を設定すると、指定された年が日付の恒久的な部分になります。ただし、ダブルクォーテーション("")にdateを置いて、年を省略すると、date表式のシーク値を計算するたびに、現在の年にコードが挿入されます。これにより、年によってコードが作成されます。
 コメント   dateについては、Calendar属性が西暦で設定されると、提供される日付は西暦でなければなりません。カレンダーがカレンダである場合、提供された日付はカレンダーでなければなりません。
日付の部分は現在のアラビア暦の期間単位です。例えば、現在のカレンダーがカレンダーで、日付の部分が年である場合、その年の値はカレンダーです。

 コメント   以下の例では、この機能のVisual Baic for Appplications(VBA)モジュールでの使用を実証している。VBAの使用に関する詳細は、「検索」の隣のプルダウンリストから「開発者参考」を選択して、検索ボックスに一つ以上のフレーズを入力してください。
以下の例では、日付を取得し、DatePart関数を使用して、その年の第数四半期に日付を表示します。
Dim TheDate As Date    ' Declare variables.
Dim Msg    
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg