カレンダーコントロールの作り方


━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
vol055

これならわかるマイクロソフトアクセス活用法
            -->カレンダーコントロールの作り方
              
発行者:高内 章治 2008年4月 2日
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
┏ 今日の内容 ━━━━━━━━━━━━━━━━━━━━━━━━┓

┃【01 - ご挨拶    】
┃【02 - トピックス  】カレンダーコントロールの作り方

┃【03 - 編集後記    】

┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛

─────────────────────────────────
【01 - ご挨拶    】          
─────────────────────────────────

こんにちは、高内(こうない)です。

今回は、

「カレンダーコントロールの作り方」

についてお話したいと思います。




─────────────────────────────────

【02 - トピックス】: カレンダーコントロールの作り方

─────────────────────────────────

前回は、カレンダーを表示させる場合、アクセス2007では簡単に表示できるお話をしました。

でも、アクセス2002/2003では、カレンダーの表示は作成する必要があります。

少し、VBAがありますが説明したいと思います。

例えば、
ある項目にカレンダーを使って日付を入力する場合は、以下のように行います。

  1. カレンダーコントロールを作成します。

  2. 日付の横に、小さなボタンを作成します。
    このボタンをクリックするとカレンダーを表示します。
    再度ボタンをクリックするとカレンダーを非表示にします。

  3. カレンダーの日付を選択したら、その日付を項目へいれます。
    項目が入力されたら、カレンダーを閉じます。


順番に説明します。

■1.まずカレンダーコントロールをフォームの中に作成します。

カレンダーコントロールは、通常はツールボックスの中には表示されていません。

ツールボックスの右下のスパナとハンマーの形をした「コントロールの選択」をクリックします。

ここには、いろいろなコントロールが入っています。

その中の下の方に「Micorsoft カレンダーコントロール xx.xx」がありますのでクリックします。

そして、フォームの中にカレンダーのコントロールを作成します。

■2.次に日付の横に、小さなボタンを作成します。
このボタンをクリックするとカレンダーを表示します。
再度ボタンをクリックするとカレンダーを非表示にします。

ボタンのイベントのクリック時にカレンダーが表示するようにします。

以下のようなVBAのコードを作成します。

---------------------------
Private Sub ボタン_Click()

If Me!Calender4.Visible = False Then

With Me!Calender4
.Value = Date
.Visible = True
.SetFocus
End With
Else
Me!Calender4.Visible = False
End If

End Sub

-----------------------

このカレンダーコントロールの名前は「Calender4」です。

何をやっているのかというと、ボタンをクリックすると

  • カレンダーが表示されていなかったら今日の日をカレンダーの値(日付)にします。

  • カレンダーを表示します。

  • カレンダーにカーソルを持ってきます。  

  • カレンダーが表示されていたら、非表示にします。
 

これで、カレンダーが表示されます。

イメージは掴めましたか?


■3.次にカレンダーの日付を選択(クリック)すると、その日付をテキストボックスの項目へいれます。
項目が入力されたら、カレンダーを閉じます。

カレンダーをクリックしてそのカレンダーの日付を項目へ入れます。

このとき、カレンダーのプロパティのイベントには、クリック時はありませんので、VBAの中に直接クリック時を作成します。

以下のようになります。

-------------------------

Private Sub Calender4_Click()

With Me!Calender4
Me!NYUKIN_DATE = .Value
Me!NYUKIN_DATE.SetFocus
.Visible = False
End With

End Sub

-------------------------

何をやっているかというと

  • カレンダーをクリックすると

  • カレンダーの値(日付)をNYUKIN_DATE(テキストボックスの名前です)に入れます。

  • NYUKIN_DATEにカーソルを持ってきます。

  • カレンダーを非表示にします。

です。 

アクセスに慣れてくれば、VBAの勉強もされるとよいと思います。
VBAは、どのくらいたくさんVBAのパターンを知っているかです。


参考にしてください。



─────────────────────────────────
【03 - 編集後記    】       
─────────────────────────────────

ガソリンの価格が下がっているようですね。
でも、ガソリンスタンドによって値段にばらつきがあるようです。

先月まで、買い控えてた人が安いお店に殺到しているそうです。

4月から、いろいろな商品が値上がりしていますので、値段が下がったのはガソリンくらいですね。

私も、そろそろガソリンがなくなりますので入れにいきます。


◆私がアクセスをマスターできたのは!!
http://www.sk-access.com/kyozai/zaiko1.html  

テーブル作成からVBAまでマスターできます。 
「在庫管理システムをアクセスで作ってみよう」教材です。
http://www.sk-access.com/kyozai/zaiko2.html  


━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
●ご意見・ご感想・ご質問
 
『メルマガでもっとお役にたてる情報を配信したいと思いますので、日ごろから疑問に思っていることを教えてください。
宛先はこちらへです』

  •  kohnai★vega.ocn.ne.jp
      (高内:こうない:)
    (メールするときは、★を@に変えてください)

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━


◎「これならわかるマイクロソフトアクセス活用法」 のバックナンバー・配信停止はこちら

archive.mag2.com/0000222659/index.html

◎以下のホームページからでもバックナンバーを見ることができます。

http://www.sk-access.com/mailmaga/index.html

登録・解除につきましてはご自身でお願いいたします。

※このメールマガジンの転送はOKですが、掲載された記事の内容を許可無く転載することをを禁止させて頂きます。
必ず事前にご相談ください。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━


1週間でアクセス(Access)のシステム開発ができる〜
「在庫管理システムをアクセスで作ってみよう」教材

「アクセスのプログラム/システムを短期間で開発したい方」、
「アクセスのフォーム/VBAを完全にマスターしたい方」のための
アクセス(Access)を使って1週間でシステム開発する究極の方法とは?

「アクセス(Access)のシステムを無料のSQL Server 2016 Expressへ
移行してみよう」教材

あなたの会社のアクセス(Access)のデータベースやシステムに不安を感じていませんか?
アクセスのデータ量が多くなり処理スピードが遅くなった。
アクセスのデータを共有したい。
セキュリティに不安がある。などと、感じている方は!!
(SQL Server 2016 Expressバージョンです。)


「アクセス(Access)プログラムの仕様書の作り方」教材
マイクロソフトアクセスを使用して、プログラムの作成/システム開発をおこないたい方の為に、
アクセス(Access)のプログラム開発に成功するために絶対に必要な「仕様書」とは?



[↑一番上へ]
[マイクロソフトアクセス活用法(メールマガジン)(ホームへ)]
12:400603

アクセス全体

VBA

SQL Server