#225 2つのフォームをAccess2002/2000で使い分ける方法 フォーム、VBA

Access2002と2000では、Access2000形式のMDBファイルを共有することができます。しかし、Access標準のものではなく、外部のコントロールを使っているようなフォームでは、うまく共有できないケースもあります。カレンダコントロールの画面表示がその一例です。
カレンダの表示例カレンダの表示例

このような場合、カレンダコントロールに対して、Access2002/2000それぞれに対応したプロパティ設定を行った2つのフォームを作成しておき、実行時にはそのデータベースを開いている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
| Index | Prev | Next |

この情報は参考になりましたか?、問題は解決しましたか?、もしまだなら......
T'sWareのワンポイトテクニカルアドバイスをご利用ください。3000円/件〜でご支援します。
スタンドアロンからSQL Server対応まで、オーダーメイドのシステムを短納期・安価でお届けします


Copyright © T'sWare All rights reserved