愚者の経験

「また今度」はほとんどこない

Accessで日付入力用のカレンダーを自作

カレンダーをダウンロード(自己責任でお願いします。改変はご自由に。)
Access2010用

参考URL:http://www.h3.dion.ne.jp/~sakatsu/Breakthrough_P-Ctrl_Arrays.htm
↑大変参考になります。これがないともっとコードが冗長になったでしょう。
似たような動作をするコントロールを大量にフォームに並べるような場合は是非利用すべきでしょう。

参考URL:http://www.h3.dion.ne.jp/~sakatsu/holiday_logic.htm
↑祝日の判定関数部分。作った人を尊敬します。

もともと作ってあったのですが、オブジェクトを大量に使いすぎているのと
コードが冗長だったので作り直しました。
(でも途中からめんどくさくなったのでif分岐多用…)

ついでに自分が便利だと思う機能を追加しました。
・(ある程度の)大きさの可変(フォームの端をドラッグできるわけではないのであしからず。)
・テキストボックスの真下に出るドロップダウン
・Windows7の日付のカレンダーのように「月単位」→「年単位」→「10年単位」というフォーカスチェンジ
・キーボードでもある程度操作可能

誰かの参考になれば幸いです。
「こんな機能があったらいいんじゃない?」というコメントもいただければ嬉しいです。

追記:(2012/02/16)
バグありました、以下の状況で起きますので注意してください。
タブオーダーが「0」のコントロールの「Enter」イベントでカレンダーを表示するフォームを開くと
ポップアップフォームではカレンダーが動作しません。

Ver.Up 文字の大きさ、余白を調整しました。(2012/02/16)

広告

コメントを残す

以下に詳細を記入するか、アイコンをクリックしてログインしてください。

WordPress.com ロゴ

WordPress.com アカウントを使ってコメントしています。 ログアウト /  変更 )

Google フォト

Google アカウントを使ってコメントしています。 ログアウト /  変更 )

Twitter 画像

Twitter アカウントを使ってコメントしています。 ログアウト /  変更 )

Facebook の写真

Facebook アカウントを使ってコメントしています。 ログアウト /  変更 )

%s と連携中

%d人のブロガーが「いいね」をつけました。