質問: access2000のコンボボックスで苦しんでます access2000でコンボボックスを用いた抽出がうまく出来ずに、苦しんでおります。 どうか、ご指導・アドバイスをお願いいたします。 「microsoft access club」というサイトの 「access裏技tips」 というページで紹介されている「立ち上がるコンボボックス」 という所で紹介されていることをそのまま真似して作ろうとしているのですが、 なぜか?うまくできません。 最後に「取引先選択」で選んでも、何も反応しないのです。 私の実力不足なことは承知しているのですが、なぜうまくいかないかアドバイス頂ければ幸いです。 私のつくった関係ありそうなコードを画像添付いたします。
回答: #2 です。 > 「microsoft access club」というサイトの 「access裏技tips」 というページで紹介されている「立ち上がるコンボボックス」 という所で紹介されていることをそのまま真似して作ろうとしているのですが、 > なぜか?うまくできません。 ということで、 コンボボックスが、自動的に開かないのが問題だと思っていました。 > 私の実力不足なことは承知しているのですが、なぜうまくいかないかアドバイス頂ければ幸いです。 参照先は、コンボボックスを開くことがメインで 抽出そのものに関しては、解説もあまりなく、 実際のコードやクエリにも、やや問題があって 練習のために作ってみる分には良いのですが、 実務ではちょっとどうかな・・・というところです。 「microsoft access club」の「参考ファイル」に上記とは若干異なりますが、データそのものは使えるサンプルファイルがあります。11番です。 http://www.accessclub.jp/samplefile/index.html ただし、フォーム等は異なりますし、エラーも出ますから あくまで、眺めてみる程度で。 実務でよく使われる、さまざまな条件で抽出する場合などでは vba でフィルタを制御するものが便利です。 というか、クエリでは複雑になりすぎます。 ちょっと、敷居が高くなりますが、こちらなどがフィルタの例です。サンプルファイルもありますので研究してください。 http://hatenachips.blog34.fc2.com/blog-entry-129.html 現在のを、そのまま利用するとして コントロールの名称が混乱していますね。 > private sub con取引先_afterupdate() > private sub con_取引先_enter() > me.cob_con取引先_enter() 'この行はそもそも不要では? > me.cob_con.取引先.dropdown プロパティの、コンボボックスの「更新後処理」は「[イベント プロシージャ]」になっていますか? なっていなければ [イベント プロシージャ] にして、右の「...」ボタンをクリックし そこに、 コードを書きましょう。 クエリの中のコンボボックス名とフォーム上のコンボボックス名は、 もちろん一致させる。 コンボボックスのプロパティで、 列数 : 2 連結列 : 1 まあ、こんなところで動くんじゃないでしょうか。