No.1ベストアンサー
- 回答日時:
Windowsの時刻をダブルクリックするととカレンダーが出ます。
これが万年時計になっているようです。
ただし、システム日付ですから,いじることは余りお勧めしませんが。
つぎの方法は計算で求めるものです。1900年1月1日を1日目として
通算日を計算するのです。
1年を365.2422日として(西暦年ー1900)をかけて切捨てすれば
その年の先頭(実は前の日)の通算日が出ます。
後は月日からその年の通算日を出して足します。
この最後の通算日を7で割ると曜日が求まります。
確か、1900年1月1日は日曜日だったような気が。
この回答へのお礼
お礼日時:2003/06/16 13:48
ありがとうございます。
カレンダーもさることながら、十干と十二支を出したいのです。
いわゆる、
甲・乙・丙・丁・戊・己・・・
子・丑・寅・卯・辰・巳・午・・・
といったものです。
これを効率よく求める方法はないものかと。
No.2
- 回答日時:
No.1のymmasayanです。
>カレンダーもさることながら、十干と十二支を出したいのです。
十干と十二支は年と日の両方ありますね。いずれにしても通算年または通算日を10または12で割れば簡単に(?)求まるでしょう。
No.3
- 回答日時:
有名なのは「ツェラーの公式」です。
昔BASICとCOBOLとMIFESエディタのマクロで作りました。
計算式は、検索していただけば見つかると思います。
とても便利な計算式なのですが、問題があって、2000年
2月28日(この年はうるう年なので29日まで)までは
正確に計算できますが、3月1日以降は途中で負の値が
出て計算不能になります。1900年代が計算基準だからです。
ですから、どこかの年の1月1日の曜日を割り出して
おいて、そこから数えるようにプログラムすれば問題
なくできます。
余談ですが、いわゆるY2K問題も、西暦を下2桁で表した
のとは別に、この計算式を搭載したプログラムでも
起こることが分かりましたよ。マクロの計算結果が
おかしくなったことに気づきました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
65536は2の何乗なのでしょうか?
-
継承元と継承先での変数
-
VBA 九九 Do While
-
ExcelのマクロVBA動作を軽くす...
-
matlabで計算終了
-
VBAの再計算が反映されない件に...
-
タクシー料金の問題です
-
VBでReplace
-
60進数の四則計算
-
0xf0=256?
-
EXCELなどで「返す」という表現
-
切り上げたい
-
傾いた四角形内の範囲の条件式
-
エクセルで特定のセルのみを任...
-
三菱シーケンサー works2 の日...
-
アドオン利率を実質年率に変換
-
BASICでモンテカルロ法
-
VB6.0でのバイナリデータの扱い...
-
fortran dlog2
-
排他的論理和 BCC(水平パリテ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
65536は2の何乗なのでしょうか?
-
排他的論理和 BCC(水平パリテ...
-
VBAの再計算が反映されない件に...
-
バッチファイルでウインドウを...
-
変化させるセルが変化しない
-
EXCELなどで「返す」という表現
-
傾いた四角形内の範囲の条件式
-
エクセルで特定のセルのみを任...
-
CとFORTRANの計算速度はどちら...
-
Visual C++でdebugとreleaseで...
-
モジュラス103の計算とは何でし...
-
なぜオーバーフローになるので...
-
VB6で正確なミリ秒を計測したい...
-
VBでReplace
-
引き放し法による除算アルゴリ...
-
matlabで計算終了
-
CRC8を教えてください
-
VBAで関数をつくる
-
Excel VBAの残業時間の合計計算...
-
等高線を計算したい
おすすめ情報