20.当サイト内に掲載の日付・時刻に関するサンプル |
1.当サイト(旧)内に掲載している日付・時刻に関するサンプル 2.サンプル投稿用掲示板に掲載している日付・時刻に関するサンプル 3.サンプル集に収録している未掲載の日付・時刻に関するサンプルの紹介 4. 5. 6. |
下記プログラムコードに関する補足・注意事項 動作確認:Windows Vista・Windows 7 (32bit) / VB6.0(SP6) Option :[Option Explicit] 参照設定:追加なし 使用 API:なし その他 : : |
1.当サイト(旧)内に掲載している日付・時刻に関するサンプル |
今日の日付と現在の時刻を得る パソコンに今日の日付や現在の時刻を設定する 指定した日付の曜日を求める 日付データを変換する 指定した年月の末日を求める 期間内の満の年月日と干支と日数・月数・曜日を求める 時間を通常のように演算する 経過時間計測色々 現在時刻を1/100秒単位で現す関数(ゆう(U)さん投稿による) |
2.サンプル投稿用掲示板に掲載している日付・時刻に関するサンプル |
3.サンプル集に収録している未掲載の日付・時刻に関するサンプルの紹介 |
指定月の指定第一*曜日を取得する(424) 第二月曜日が何日になるかを取得、指定月の指定第**曜日を取得する関数、 (祭日等が第二月曜日だったりする場合の取得に便利かと) タイマーイベントをAPIを使って実現(187) API関数を使ってタイマーイベントを発生、VBのタイマーコントロールと精度は同じだが長い時間の指定ができる アナログ時計(535) 実用度はあまりないかと思いますが結構、課題とかで質問があるので作って見ました。 円形のフォームを作成し、そこに表示しております。 サンプル実行図 現在日時をミリ秒単位で取得する関数(537) Timer 関数では、24時間しか取得できないし、API関数のtimeGetTimeでもシステムを起動してから、49.71 日で リセットされるので、継続して(100年以上は)取得できる関数を作ってみました。 2000/01/01 〜現在時刻までをミリ秒単位(Currency 型変数で)で取得できるように作っております。 timeGetTime を使っての経過時間測定を比較しても、殆ど誤差はありません。 |
4. |
5. |
6. |