access2010 カレンダーコントロールmscal.ocxからの変更

カレンダーコントロール　mscal.ocx　がなくなったので、DatePickerへの変更時のメモ
カレンダーコントロールのイベントで制御などしていた場合について。
該当するテキストボックスイベントChangeとTextプロパティを使いましょうかね。ValueだとDatePickerで選択した日付は参照できないのさ。Form.Requeryでもいい場合もあるかもだけど、レコード確定しちゃうから普通は避けるべきじゃないかな。

Option Compare Database
Option Explicit

Private Sub date01_Change()
    If Not IsDate(Me.date01.Text) Then Exit Sub
    '以降、日付とかに合わせた処理
End Sub

Private Sub date02_Change()
    If Not IsDate(Me.date02.Text) Then Exit Sub
    '以降、日付とかに合わせた処理
End Sub

Private Sub date02_GotFocus()
    DoCmd.RunCommand acCmdShowDatePicker
End Sub