TimeSerial

---

構文

TimeSerial(hour,minute,second)

引数hourには、時を表す数式を指定します。

引数minuteには、分を表す数式を指定します。

引数secondには、秒を表す数式を指定します。

解説

各引数で指定された時、分、秒を表すシリアル値を返します。

サンプル

次の例は、ユーザーが入力した時刻を表示します。

Sub Sample()
    Dim hour As Integer, minute As Integer, second As Integer
    hour = InputBox("時を入力してください")
    minute = InputBox("分を入力してください")
    second = InputBox("秒を入力してください")
    MsgBox TimeSerial(hour, minute, second)
End Sub