• ベストアンサー

vbデータベースのコンボボックスの連動

お世話様です。 VBでデータベースを作っています。 Accessのテーブルからコンボボックスで、レコードを 読み込んでるのですが、1つ目のコンボボックスで 選択した際に、他のコンボボックスも連動するようにするにはどうすればいいでしょうか?? たとえば  コンボボックスであるレコードを選択。 他のコンボボックスでは、先のコンボボックス で絞り込まれたレコードのみ選択できるようにする。 それに伴い他のフィールドも連動するということです。 どうぞよろしくお願いいたします。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

>VBでデータベースを作っています。 データベースはAccessで、VBでデータ検索画面を作っているということでしょうか? 一つ目のコンボボックスのSelectedIndexChangeイベントかなんかで、他のコントロールの中身を作り変えてあげればいいんでないですかね?

naoki5252
質問者

補足

elmgarden様 ご回答ありがとうございます。 おっしゃる通りデータベースはACCESSです。 しかし、SelectedIndexChangeイベントの使い方が よくわかりません。 申し訳ありませんが、ご教授願えないでしょうか?

関連するQ&A

  • accessのコンボボックスのことで質問です。

    accessを勉強しているのですが、ちょっとしたことで分からなくなってしまいました・・。 質問の内容なのですが、まずフォーム上にコンボボックスAとコンボボックスBを配置するとします。 レコードソースには仮に[情報テーブル]というテーブルが選択されているとします。 コンボボックスAには[情報テーブル]のフィールド名が、 例えば[顧客NO]、[商品]、[値段]というフィールド名が入っているとし、フィールドにはそれぞれ10件ずつデータが入力されています。 そしてコンボボックスAで[顧客NO]を選択するとコンボボックスBに[顧客NO]の10件のデータが挿入され、選択できるようにしたいのです。 他のフィールド名を選んだときにも同じようにコンボボックスBにフィールドのデータが入るようにしたいと思っています。 コンボボックスAにテーブル名を入れることはできたのですが、 コンボボックスAで選択されたフィールドのデータを、コンボボックスBで選択できるようにするというやり方がわからないのです・・。 accessは2002を使っています。 よろしくお願いします。

  • VB.NET)コンボボックスの連動について

    失礼いたします、コンボボックスを連動させるプログラムを書いているのですがうまく連動しません、よろしければお知恵をお貸しくださいませ コードを書くにあたりの条件は、開発はVisual Basic 2005のVisual Basic データベースから呼び出す場合ならAccess 2003を使用(今現在は使用しないで開発しています) Access内でコンボボックスを、Excelでコンボボックスをなどはしません…今回はVBでコンボボックスを連動させたい 今回ちょっと公に出来ない箇所があり記号で伏せさせていただきますが、記号は日本語が入ります Form1でload(ロードってこれであってましたっけ?)部分に以下を記載 dim strdata as string = {"●●","●●","●●"} (すみません、あと一文あったのですがちょっと思い出せないので) それで連動するcomobox2には以下を記載 dim strdata as string = {"●●","●●"} dim i as integer select case strdata(i) case 0 combobox2.item.addrange("●△ ×") combobox2.item.addrange("●△ ×") combobox2.item.addrange("●△ ×") case 1 combobox2.item.addrange("●△ ×") combobox2.item.addrange("●△ ×") combobox2.item.addrange("●△ ×") となり、combobox1で最初の●●が選ばれればcombobox2のcase0を表示させるようにしたいと思っていますが上手く表示が出ません 今週中に仕上げなければいけないので昨日今日と色々調べてみたのですが、VBAやAccess・Excel関係が殆どでVBのが見つからずAccessやExcelのを見ても上手くいかなかったのと、解説が良く分からなかったので、分かりやすく解説をお願いします

  • ACCESSを用いたデータベースでのコンボボックスの連動

    おせわになっております。 VBでデータベースを作っているのですが、 コンボボックスでの検索での絞込みがうまくいきません。 (データベースはAccess2000) 例えば、コンボボックス1で選ばれたファールドにより 絞込みが行われ(例:県選択:千葉県) 、コンボボックス2で表示するレコードは コンボボックス1で選択されたレコードに該当するものしか表示しないようにするというとです。(例:市選択:市川市.船橋市.浦安市・・・と絞り込まれる) どこかおかしい個所はありますでしょうか?? (個人的にはdbc1が選択された時点でdbc2のクエリーが行われなければならないと思いますが、やり方がわかりません。 よろしくお願い致します。 adoデータコントロールのプロパティ ado1(県名選択) RecordSource:SELECT 県名 FROM 地名 ado2(市名選択) RecordSource:SELECT 市名 FROM 地名 WHERE 県名='dbc1.Text' Private Sub dbc1_Click(Area As Integer)'県を選択するコンボボックス Dim criteria As String ' 検索条件 If dbc1.Text = "" Then Exit Sub End If criteria = "県名 = '" & dbc1.SelText & "'" rs.MoveFirst rs.Find criteria, , adSearchForward End Sub Private Sub dbc2_Click(Area As Integer)'市を選択するためのコンボボックス Dim criteria2 As String ' 検索条件 If dbc2.Text = "" Then Exit Sub End If criteria2 = "メーカ = '" & dbc2.SelText & "'" rs.MoveFirst rs.Find criteria2, , adSearchForward End Sub

  • コンボボックス

    お世話になっております 既存のデータベースからaccessを使って検索を行っている者です 表示させるテーブルの中でひとつだけ 5パターンの文字列が入力されているフィールドがあります それをフォームで表示する際にコンボボックスで表示させたいのですが どのようにすればよいのでしょうか? コンボボックスを作るときフィールドを割り当てると 同じ入力内容も全て表示されてしまってものすごい量になってしまいます これを5種類のいずれかを選択させる形で表示させたいです あと、入力されている内容とは別のものを表示したいのです たとえば フィールドの内容は G1,G2,G3,G4,G5 だとして G1だったら「印刷」 G2だったら「表示」 というような表示をさせたいと思っています ご存知の方よろしくお願いいたします

  • ACCESSを用いたデータベースでのコンボボックスの連動について

    おせわになっております。 VBでデータベースを作っているのですが、 コンボボックスでの検索での絞込みがうまくいきません。 例えば、コンボボックス1で選ばれたファールドにより 絞込みが行われ、コンボボックス2で表示するレコードは コンボボックス1で選択されたレコードに該当するものしか表示しないようにするというとです。 どこかおかしい個所はありますでしょうか?? よろしくお願い致します。 Private Sub dbc1_Click(Area As Integer) '1つめのコンボボックス Dim criteria As String ' 検索条件 If dbc1.Text = "" Then Exit Sub End If criteria = "県名 = '" & dbc1.SelText & "'" rs.MoveFirst rs.Find criteria, , adSearchForward dbc2.SetFocus `dbc2にフォーカスを移す End Sub Private Sub dbc2_Click(Area As Integer) ’2つ目のコンボボックス Dim mySQL As String mySQL = "SELECT 市名 FROM 地名" _ & "where 県名 = '" & dbc1.SelText & "'" ’コンボボックス1で選択されたものを抽出条件とする。 Set rs = New ADODB.Recordset rs.Open mySQL, cn, adOpenStatic Set Dbc2.DataSource = rs End Sub

  • ADO コンボボックスについて質問です。

    ADO コンボボックスについて質問です。 Access2000 ADO を使用し、コンボボックスの作成をしています。 当初レコードセットの strItem = フィールド(1) & ";" & フィールド(2) として、Me![コンボボックス].AddItem = strItem をDo Loopさせていましたが、 使用環境がAccess2000の為、.AddItemが使用できません。 ADOのテーブルをコンボボックスに表示するにはどの様にすれば良いのでしょうか? 出来ればソースをよろしくお願いいたします。 m(_ _)m

  • コンボボックスの設定について

    コンボボックスの設定について Access2000でプログラムを作っているところで質問です。 とあるコンボボックスで項目を選択すると、そこに連動した形で他のフィールドにも 項目が表示されるようになっています。もちろんコンボボックスからは自由に項目を 選べるようになっています。 今回は、そのコンボボックスの項目表示を固定化して他の項目を選べないように改修を しています。現在表示されている項目以外、コンボボックスをクリックしてもボックス 内に表示されないようにする方法をご存知の方、お知恵をお借りしたいと思います。

  • VBでコンボボックスとテキストボックスの連係

    VBでフォームにデータコンボボックスとテキストボックスを一つづつ作り、データコンボボックスで値を選択し、その値に対する値をテキストボックスに表示させたいんですがどうすればいいでしょうか? データコンボボックスで選択する元になるテーブルは ID | 商品 1 | みかん 2 | ばなな 3 | りんご と、上記のような形のテーブルをもちいています。 例えばデータコンボボックスで「1」を選択した場合テキストボックスに「みかん」と表示させたいです。

  • コンボボックスの値が消えてしまいます。

    コンボボックスの値が消えてしまいます。 フォーム(1)にコンボボックスA(値集合ソースはテーブル1)があります、この リスト外入力時で別フォーム(2)(レコード追加用)を開きテーブル1にレコードを追加、 フォーム(2)を閉じる時にコンボボックスAをリクエリかけてフォーム(1)に戻るとコンボボックスAが空になっているのでリストを開き選択し直さなければいけません! フォーム(1)に戻った時コンボボックスAに入力した値を選択させておくにはどの様にすれば良いか アドバイスよろしくお願いいたします。 WIN XP ACCESS 2003で作成しています。

  • VB6.0で データベースの値をコンボボックスに取り込む方法

    VB6.0で データベースの値をコンボボックスに取り込む方法ですが、 普通にCombobox.additem = rs.fields(列名).value だったかな? これで、セットした場合 レコードが5件あったら最初の1件しか取得できませんよね?whileでまわして取得すればいいのでしょうか?←どう記述すればいいのか・・。 また、他にいい方法ないでしょうか?一気にセットできる方法など。 よろしくお願いします。

専門家に質問してみよう