ACCESSのフォームとサブフォームについて

いつもみなさんにはお世話になっております。

ACCESS2000を使用しています。
テーブルＡ，Ｂ，Ｃを用意しフォームにサブフォーム、リストボックス、ボタンを配置し、リストボックスの表示内容（Ａ，Ｂ，Ｃ）に合わせてボタンクリックでサブフォームの表示テーブル（Ａ，Ｂ，Ｃ）を変更したいのですがどうしたら良いのか解りません。

みなさんどうかよろしくお願いします。

No.1 ベストアンサー 回答者： tsukasa-12r 回答日時： 2004/04/04 15:08

テーブルＡ、Ｂ、Ｃの内容の内、表示させるフィールドが全て同じなら、サブフォームのレコードソースを設定してやればいいと思うんですけど。

Me.サブフォーム1.Form.RecordSource = "テーブル" & Me.リストボックス1
のような感じで。
表示する内容がＡ、Ｂ、Ｃで異なるのなら、Ａ用、Ｂ用、Ｃ用のフォームを作っておいて、
Select Case リストボックス1
Case "A"
　　Me.サブフォーム1.SourceObject = "Ａ用フォーム"
Case "B"
　　Me.サブフォーム1.SourceObject = "Ｂ用フォーム"
Case "C"
　　Me.サブフォーム1.SourceObject = "Ｃ用フォーム"
End Select
のような感じでできるんじゃないでしょうか。
（やったことないので推測ですが。）

この回答へのお礼

回答ありがとうございます。

一つ目を参考にしてコードに書き込んでみたらイメージしていたことができました。
ありがとうございました。またなにかありましたらよろしくお願いします。

お礼日時：2004/04/04 15:25