#225
Access2002と2000では、Access2000形式のMDBファイルを共有することができます。しかし、Access標準のものではなく、外部のコントロールを使っているようなフォームでは、うまく共有できないケースもあります。カレンダコントロールの画面表示がその一例です。
このような場合、カレンダコントロールに対して、Access2002/2000それぞれに対応したプロパティ設定を行った２つのフォームを作成しておき、実行時にはそのデータベースを開いているAccessのバージョンを調べ、それによってAccess2002用のフォームとAccess2000用のフォームを使い分けるという方法があります。
それには、次のようなプログラムを使います。SysCmd(acSysCmdAccessVer)によって、実行されているAccessのバージョンを取得することができます。
'Accessのバージョンを確認して
'使用するカレンダフォームを切り替える
If SysCmd(acSysCmdAccessVer) = "10.0" Then
'Access2002の場合
DoCmd.OpenForm "fdlgカレンダ2002"
Else
'Access2000の場合
DoCmd.OpenForm "fdlgカレンダ2000"
End If
'使用するカレンダフォームを切り替える
If SysCmd(acSysCmdAccessVer) = "10.0" Then
'Access2002の場合
DoCmd.OpenForm "fdlgカレンダ2002"
Else
'Access2000の場合
DoCmd.OpenForm "fdlgカレンダ2000"
End If
