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

  • リファレンス

定義

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

1 年 1 月 1 日を基準に設定された日付情報を使用して、指定された時、分、秒を表す Date 値を返します。

public:
 static DateTime TimeSerial(int Hour, int Minute, int Second);
public static DateTime TimeSerial (int Hour, int Minute, int Second);
static member TimeSerial : int * int * int -> DateTime
Public Function TimeSerial (Hour As Integer, Minute As Integer, Second As Integer) As DateTime

パラメーター

Hour
Int32

必須です。 0 から 23 の整数式。 ただし、この範囲外の値も受け入れられます。

Minute
Int32

必須です。 0 から 59 の整数式。 ただし、この範囲外の値も受け入れられます。 計算される時には Minute の値が加算されるため、負の値を指定するとその時からさかのぼる分数が指定されます。

Second
Int32

必須です。 0 から 59 の整数式。 ただし、この範囲外の値も受け入れられます。 算出される分には Second の値が加算されるため、負の値を指定するとその分からさかのぼる秒数が指定されます。

戻り値

DateTime

1 年 1 月 1 日を基準に設定された日付情報を使用して、指定された時、分、秒を表す Date 値。

例外

ArgumentException

引数が -2,147,483,648 ～ 2,147,483,647 の範囲外です。

ArgumentOutOfRangeException

計算された時刻が負の 24 時間より小さくなっています。

例

次の例では、 関数を TimeSerial 使用して、指定した時間、分、秒の時刻を返します。

Dim thisTime As Date
thisTime = TimeSerial(16, 35, 17)

注釈

次の例では、負、ゼロ、正の引数の値を示します。 関数は TimeSerial 、正午の 3 時間前の 15 分前、または午前 8 時 45 分を表す時刻を返します。

Dim alarmTime As Date = TimeSerial(12 - 3, -15, 0)

Minuteまたは Second が通常の範囲を超える場合は、必要に応じて次の大きな単位に適用されます。 たとえば、75 分を指定すると、1 時間 15 分として評価されます。

TimeSerial は、合計秒数剰余 86,400 (1 日の秒数) を減らします。 したがって、返される時刻は常に 00:00:00 から 23:59:59 の間です。

データ型には Date 日付コンポーネントが含まれます。 TimeSerial はこれらすべてを 1 に設定するため、戻り値は 1 年の最初の日を表します。 ただし、引数の値によって計算された時間が 24 時間を超える場合は、必要に応じて日がインクリメントされます。 次の例では、 と Minute のHour値を使用すると、合計時間が 24 時間を超えます。

MsgBox(TimeSerial(23, 75, 0))   
' The preceding statement displays "1/2/0001 12:15:00 AM".

引数の値が負の計算時刻になる場合、日付情報は 1/1/0001 に設定され、時刻情報は 00:00:00 から 23:59:59 の間に調整されます。 ただし、計算された時間が負の 24 時間未満の場合は、 ArgumentOutOfRangeException エラーが発生します。

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

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

適用対象

こちらもご覧ください