質問: access コマンドボタンクリックでサブフォームに結果表示 access初心者です。 フォームに50音順コマンドボタンを作成、 コマンドボタンの「あ」をクリックしたら、下のサブフォームに 「あ」から始まる名前を表示したいのです。 サブフォームに表示するクエリの抽出条件にどのようにを入力するのでしょうか?あいまい検索?? コマンドボタンのイベントからマクロを作成するのでしょうか? すごく初歩的な質問ですね、、、お恥ずかしい どなたか教えていただければうれしいです。
回答: 名簿一覧: id__名前_______読み 01__鈴木 一郎__すずき いちろう 02__中村 主水__なかむら もんど このようなテーブルを仮定します。 <メイン・サブフォーム形式ではない方法で> 1、このテーブルを基に<表形式>でフォーム[名簿一覧]を作成します。 2、[デザインビューでフォームを作成する]をクリックします。 3、無地のフォームにフォーム[名簿一覧]をドラッグアンドドロップします。 4、フォーム[名簿一覧]を配置したフォームのプロパティを最適化します。 ・標題=名簿一覧の参照 ・スクロールバー=なし ・レコードセレクタ=いいえ ・移動ボタン=いいえ 5、ここで、一旦、[名簿一覧の参照]名で保存します。 出来上がったフォーム[名簿一覧の参照]を開くと全ての[名簿一覧]が表示されています。 問題は、この全表示を列[読み]の先頭の一文字のみに対応するレコードに絞り込む方法。 6、フォーム[名簿一覧の参照]に[コンボ_頭文字]を配置します。 ・値集合タイプ=値リスト ・値集合ソース=す・・・で始まる名簿一覧;な・・・で始まる名簿一覧 <-- 実際的ではないが・・・。 7、[コンボ_頭文字]を右クリックして[イベントのビルド]-[コードビルダ]をクリック。 private sub コンボ_頭文字_afterupdate() if len(me.コンボ_頭文字.value & "") then me.名簿一覧.requery end if end sub ここで一旦再保存します。 8、フォーム[名簿一覧]をクリックし[レコードソースを編集]し保存。 select 名簿一覧.id, 名簿一覧.名前, 名簿一覧.読み from 名簿一覧 where (((名簿一覧.読み) like left(forms!名簿一覧の参照!コンボ_頭文字,1) & "*")); 9、フォーム[名簿一覧の参照]の起動時の設定を追加。 private sub form_load() me.コンボ_頭文字.value = me.コンボ_頭文字.itemdata(0) コンボ_頭文字_afterupdate end sub これで、起動時にコンボボックスの先頭の頭文字に対応するレコードが表示されます。 以上!