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