次のコードは実行時の時間をメッセージで表示するマクロである。
空欄に入る適切な語句の組み合わせとして正しいものを選択肢から1つ選びなさい。
Sub Exam1()
Dim A As Integer, B As Integer, C As Integer
A = Hour(Now)
B = 【 空欄① 】(Now)
C = 【 空欄② 】(Now)
MsgBox "時間は" & A & "時" & B & "分" & C & "秒です。"
End Sub
1. ① Second ② Minute
2. ① Year ② Month
3. ① Minute ② Second
4. ① Hour ② Day
正解
3
解説
【8章 関数】
●指定の時間、分、秒の各数値を調べる問題です。
・それぞれ調べるには時間はHour関数、分はMinute関数、秒はSecond関数を使用します。
マクロを実行すると各関数は時間単位、分単位、秒単位の「数値」を返します。
本問題では引数にNow関数を指定しているので、実行した時間のそれぞれの数値を返します。
●Hour関数、Minute関数、Second関数
構文
・Hour (時間の引数)
…指定した時間のより「時間」を表す数値を返します。
・Minute (時間の引数)
…指定した時間のより「分」を表す数値を返します。
・Second (時間の引数)
…指定した時間のより「秒」を表す数値を返します。
次のコードは実行時の時間をメッセージで表示するマクロである。
空欄に入る適切な語句の組み合わせとして正しいものを選択肢から1つ選びなさい。
1. ① Second ② Minute
誤り。
①と②位置が反対になっています。Minute関数は、時刻の「分」を取得するための関数です。 Second関数は、時刻の「秒」を取得するための関数です。
2. ① Year ② Month
誤り。
Year関数は、時刻の「年」を取得するための関数です。 Month関数は、時刻の「月」を取得するための関数です。
3. ① Minute ② Second
正しい。
Minute関数は、時刻の「分」を取得するための関数です。 Second関数は、時刻の「秒」を取得するための関数です。
4. ① Hour ② Day
誤り。
Hour関数は、時刻の「時」を取得するための関数です。 Day関数は、時刻の「日」を取得するための関数です。
【コード解説】
Sub Exam1()
Dim A As Integer, B As Integer, C As Integer
' 時間、分、秒を格納するための変数A, B, Cを宣言します。
A = Hour(Now)
' 現在時刻（Now）から「時間」を取得し、変数Aに格納します。
B = Minute(Now)
' 現在時刻（Now）から「分」を取得し、変数Bに格納します。
C = Second(Now)
' 現在時刻（Now）から「秒」を取得し、変数Cに格納します。
MsgBox "時間は" & A & "時" & B & "分" & C & "秒です。"
' メッセージボックスを表示し、現在時刻を時、分、秒の形式で出力します。
End Sub
