OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
解決
済み

万年暦の作り方

  • 困ってます
  • 質問No.224151
  • 閲覧数2826
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 100% (1/1)

こんにちわ。
VB初心者です。
万年暦の作り方(コードの書き方、流れ、など何でも結構ですので)
教えてください。
西暦と月を入力するとカレンダーが表示されるようなものです・・・。。
大雑把で申し訳ありませんが、よろしくお願いします。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.1
レベル13

ベストアンサー率 25% (323/1260)

こんにちわ。

流れとしましては、入力したい年月(Y年M月とします。)の1日が何曜日か求める。VBにも関数があると思いますが、関数がなければ自分で定義しなければなりません。
この場合、西暦1年1月1日(現実的には1900年1月1日で十分?)からY年M月1日までの経過日数を算出し、7で割った余りが0の時が日曜日です。
この際、閏年を考慮する必要があり、西暦年が4で割り切れる年は閏年。ただし、100で割り切れる年は平年。しかし、400で割り切れる年は閏年、というルールがあります。
後は、配列に順次日数分格納すれば、とりあえず、その月のカレンダーはできると思います。

この他、元号の扱いや国民の祝日なども考慮しなければなりませんし、春・秋分の日も前年11月にしかわかりません。また、旧暦などが入ってくるともっと複雑になります。

とりあえず、何か質問がありましたら、補足要求してください。
お礼コメント
amx-100

お礼率 100% (1/1)

coco1さんありがとうございます。
参考書なども買ってみたのですが、分からないことだらけです(;´Д`)
できるところまでがんばってみます。
ので、また何かあったらお願いします。
投稿日時 - 2002-02-24 23:20:26
-PR-
-PR-
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ