HTAをもっと流行らせる計画

HTAをもっと流行らせる計画 at TECH

428:デフォルトの名無しさん
07/03/18 19:39:56
>>377
時間ごとにメッセージ変更してみた。

If Hour(Now()) < 12 then
Document.Write "おはようございます、ご主人様！"
ElseIf Hour(Now()) >= 12 And Hour(Now()) < 13 then
Document.Write "お昼ですね、ご主人様！"
ElseIf Hour(Now()) >= 13 And Hour(Now()) < 17 then
Document.Write "こんにちは、ご主人様！"
ElseIf Hour(Now()) >= 17 then
Document.Write "おかえりなさいませ、ご主人様！<br>"
Document.Write "ご飯にします？　それともおフロ？"
End If

次ページ

続きを表示

1を表示