DateAndTime.DateSerial(Int32, Int32, Int32) メソッド

  • リファレンス

定義

名前空間:
Microsoft.VisualBasic
アセンブリ:
Microsoft.VisualBasic.Core.dll
アセンブリ:
Microsoft.VisualBasic.dll
ソース:
DateAndTime.vb
ソース:
DateAndTime.vb
ソース:
DateAndTime.vb

Date指定した年、月、日を表す値を返し、時刻情報を午前 0 時 (00:00:00) に設定します。

public:
 static DateTime DateSerial(int Year, int Month, int Day);
public static DateTime DateSerial (int Year, int Month, int Day);
static member DateSerial : int * int * int -> DateTime
Public Function DateSerial (Year As Integer, Month As Integer, Day As Integer) As DateTime

パラメーター

Year
Int32

必須です。 1 から 9999 の整数式。 ただし、この範囲より小さい値も受け入れられます。 が 0 から 99 の場合 Year 、「解説」セクションで説明されているように、1930 年から 2029 年の間であると解釈されます。 Year が 1 未満の場合、現在の年からその値が減算されます。

Month
Int32

必須です。 1 から 12 の整数式。 ただし、この範囲外の値も受け入れられます。 Month の値は 1 だけオフセットされた後、計算対象の年の 1 月に加算されます。 つまり、(Month - 1) が 1 月に加算されます。 年は必要に応じて再計算されます。 この処理による結果の例を次に示します。

Month が 1 の場合、結果は計算対象の年の 1 月になります。

Month が 0 の場合、結果は前年の 12 月になります。

If Month が -1 の場合、結果は前年の 11 月になります。

Month が 13 の場合、結果は翌年の 1 月になります。

Day
Int32

必須です。 1 から 31 の整数式。 ただし、この範囲外の値も受け入れられます。 Day の値は 1 だけオフセットされた後、計算対象の月の最初の日に加算されます。 つまり、(Day - 1) がその月の最初の日に加算されます。 必要に応じて月と年が再計算されます。 この処理による結果の例を次に示します。

Day が 1 の場合、結果は計算対象の月の最初の日になります。

Day が 0 の場合、結果は前月の末日になります。

Day が -1 の場合、結果は前月の末日の前日になります。

Day が現在の月の末日を過ぎている場合、結果は翌月の適切な日になります。 たとえば、Month が 4 で Day が 31 の場合、結果は 5 月 1 日になります。

戻り値

DateTime

時刻情報が午前 0 時 (00:00:00) に設定された、指定した年、月、日を表す値。

例

この例では、 関数を DateSerial 使用して、指定した年、月、日の日付を返します。

' DateSerial returns the date for a specified year, month, and day.
Dim aDate As Date
' Variable aDate contains the date for February 12, 1969.
aDate = DateSerial(1969, 2, 12)
Console.WriteLine(aDate)

' The following example uses DateSerial to determine and display
' the last day of the previous month.
' First, establish a starting date.
Dim startDate = #1/23/1994#
' The 0 for the day represents the last day of the previous month.
Dim endOfLastMonth = DateSerial(startDate.Year, startDate.Month, 0)
Console.WriteLine("Last day in the previous month: " & endOfLastMonth)

' The following example finds and displays the day of the week that the 
' 15th day of the following month will fall on.
Dim fifteenthsDay = DateSerial(Today.Year, Today.Month + 1, 15)
Console.WriteLine("The 15th of next month is a {0}", fifteenthsDay.DayOfWeek)

注釈

引数の 2 桁の Year 値は、ユーザー定義のコンピューター設定に基づいて解釈されます。 既定の設定では、0 ~ 29 の値は 2000 年から 2029 年として解釈され、30 から 99 の値は 1930 年から 1999 年と解釈されます。 他のすべての年を示すには、4 桁の年 (1924 など) を使用します。

次の例では、負の引数、0、および正の引数の値を示します。 ここでは、 関数は DateSerial 、現在の年の 10 年前の 3 月の最初の日の前日を表す を返 Date します。つまり、10 年前の 2 月の最終日を表します。

Dim EndFeb As Date = DateSerial(-10, 3, 0)

または Day がMonth通常の範囲を超える場合は、必要に応じて次の大きな単位に適用されます。 たとえば、32 日を指定すると、 の値 Monthに応じて、1 か月と 1 日から 4 日間が評価されます。 が 9999 より大きい場合 Year 、または引数が -2,147,483,648 ~ 2,147,483,647 の範囲外の場合は、 ArgumentException エラーが発生します。 3 つの引数で指定された日付が 1 年の 1 月 1 日の 00:00:00 より前、または 9999 年 12 月 31 日の 23:59:59 より前の場合は、 ArgumentOutOfRangeException エラーが発生します。

データ型には Date 時間コンポーネントが含まれます。 DateSerial はこれらすべてを 0 に設定するため、戻り値は計算日の始まりを表します。

すべての Date 値は 構造体で DateTime サポートされているため、そのメソッドを使用すると、値のアセンブルに関する追加のオプションが Date 提供されます。 たとえば、オーバーロードされた DateTime コンストラクターのいずれかを使用して、必要な Date コンポーネントの組み合わせを使用して変数を設定できます。 次の例では、午前 8 時 30 分の 1 秒前に 1978 年 5 月 6 日に設定 NewDateTime します。

Dim NewDateTime As Date = New Date(1978, 5, 6, 8, 29, 59, 900)

適用対象

こちらもご覧ください