Lesson16(時間関数)
それでは今日のレッスンを始めましょう。いつもの様にエクセルかワードを
立ち上げたら、「Alt」キーと「F11」キーを同時に押してVBEを立ち上げましょう。
ユーザーフォームを挿入したら、コマンドボタンを縦に7つ並べて下さい。
キャプションをそれぞれ、「年」、「月」、「日」、「曜日」、「時」、「分」、
「秒」と書き換えて下さい。そしてそのコマンドボタンの隣に、テキストボックスを
7つ縦に並べてみて下さい。テキストボックスのプロパティウインドウでフォントを
16くらいにしておいて下さい。
このレッスンでは時間を表す関数と変換を勉強しましょう。VBAではPCが
持っている時間を取得することができます。その関数には「Now」「Date」「Time」
の3種類があります。さらにその関数で取得した値から、年だけとか日にちだけを
取り出す関数がいくつか用意されています。ここでは、「Now」で現在の年月日時間を
取得して、それを、年、月、日、曜日、時、分、秒に変換してみましょう。コードはこうなります。
さぁ実行してみましょう。コマンドボタンを上からクリックして行くと、
隣のテキストボックスに順に、1999、10、10と表示されて行きます。
曜日のところは、「1」と表示されました。日曜から土曜を1から7で表して
いる様です。こんかいの練習問題は、ここにちゃんと、「日」とか「月」とか
表示する様にレッスン16のコードを書き換えてみて下さいね。
![]()
ご意見・ご感想は