これならわかるマイクロソフトアクセス活用法


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



━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
                                           Vol.055

 これならわかるマイクロソフトアクセス活用法
  -->カレンダーコントロールの作り方
              
                            発行者:高内 章治 2008/04/02
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
┏ 今日の内容 ━━━━━━━━━━━━━━━━━━━━━━━━┓
┃              
┃ 【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/index.html  
 
◆私がアクセスをマスターできたのは!!
 テーブル作成からVBAまでマスターできます。 
 「在庫管理システムをアクセスで作ってみよう」教材は

http://www.sk-access.com/Kyozai/Zaiko1.html  


◆ロット別の在庫管理ができる格安ソフトです。
 マイクロソフトアクセスで動きます。是非、ご覧ください。

http://www.sk-access.com/Soft/Kzaiko_Desc.html  

 ロット別に在庫管理ができるソフトって少ないのですよ。

◆資格を取ろう

・MOS/旧MOUS:マイクロソフトオフィススペシャリスト)
 マイクロソフト社が認定した資格です。実技試験です。
 アクセスの資格もあります。もちろんワードやエクセルもあります。

http://www.sk-access.com/Shikaku/Shika010_Mos.html   


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

 → kohnai@vega.ocn.ne.jp   (高内:こうない)

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

【発行人】: 高内 章治(こうない しょうじ)
【ホームページ】: http://www.sk-access.com/index.html
【メールアドレス】: kohnai@vega.ocn.ne.jp
【購読登録・解除】: http://www.mag2.com/m/0000222659.html (まぐまぐ)


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

http://archive.mag2.com/0000222659/index.html

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

http://www.sk-access.com/MailMaga/Mail_List1.html

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

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

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



アクセスを使って1週間でシステム構築ができる〜「在庫管理システムをアクセスで作ってみよう」教材
「アクセスでシステムを早く開発したい方」、
「アクセスでシステム開発をあきらめた方」のための
アクセスを使って1週間でシステム構築する究極の方法とは?