• 締切済み

コンボボックスの値の表示方法

お世話になります。VB6で開発しています。 コンボボックス(cmb_No)で▼をクリックすると、従業員No(5桁)とその横に氏名が表示されるとします。 この一覧より一つクリックして選択したときに、コンボボックスのテキストには従業員Noのみ表示させたいのですが、何か方法はありませんでしょうか? Click時イベントでリストインデックス(idx)を取得後、 cmb_No.text = Left(cmb_No.List(idx),5) としましたが、テキストには表示されません。 普通に何もイベントを書かずに選択すると選択したものがそのままTextに残りますよね?

  • NKNK
  • お礼率53% (8/15)

みんなの回答

  • todo36
  • ベストアンサー率58% (728/1234)
回答No.1

>としましたが、テキストには表示されません。 表示されますが。。。 Private Sub Combo1_Click() With Combo1 .Text = Left(.List(.ListIndex), 5) End With End Sub

NKNK
質問者

補足

なぜでしょう?同じコードを貼り付けてもできません(TT) コンボボックスに表示させているデータは、 (1)CSVファイルの値を取得 (2)2つのフィールドデータをつなげてコンボボックスにAddItem しているのですが、それがいけないのでしょうか?

関連するQ&A

  • MFCでのコンボボックスについて

    ご教授願いたくよろしくお願いします。 初歩的な質問ですみません。 何度やっても表示されません。 開発環境 OS:WindowsXP PP:VC++ 6.0 MFC 使用 質問 コンボボックスの初期値として、"F3"という文字を コンボボックスのテキストに表示させたいのです。 コンボボックスのリストから選択した項目の文字列を表示させたいのですが、できません。 コンボボックスのプロパティとしては、 タイプ:ドロップダウン オーナー描画:いいえ 初期描画で使用しているロジックとしては、 CString sss; m_cmb1.GetLBText(0, sss); m_cmb1.SetWindowText(sss); UpdateData(FALSE); ※m_cmb1は、CComboBox の変数です。 参考になるURLやロジックをお願いします!

  • 【Access】コンボボックスの値の変更方法

    フォームにコンボボックスを配置し、下記の動作をさせたいと思ったのですが、1は出来たものの2が出来ませんでした(値集合ソースの中身は表示されるものの、選択してもコンボボックスに反映されませんでした)。 1. フォームオープン・・・データベースのcmb1の値より、対応する文字をコンボボックスに表示する。 2. コンボボックスの値の変更・・・プルダウンから値集合ソースに表示されている任意の値を選択し、コンボボックスに設定する。 その為、どうすれば値を変更できるようになるかアドバイスいただける方がいらっしゃいましたら、ご教示の程よろしくお願いします。 なお、初期状態から下記を変更しております。 【テーブル】 テーブル名:tbl フィールド名:ID,cmb1 値:1,2 【フォーム】 フォーム名:form1(コンボボックスを一つ配置) フォームのレコードソース:SELECT Choose(tbl.cmb1,"A","B","C") AS nm_cmb FROM tbl WHERE (((tbl.ID)=1)); コンボボックス 列数:2 列幅:0cm;3cm コントロールソース:nm_cmb 値集合タイプ:値リスト 値集合ソース:1;A;2;B;3;C 連結列:2 上記の状態で起動時のコンボボックスの中身は"B"と表示されるものの、コンボボックスのプルダウンメニューを表示して値を変更しようとしても出来ない事が確認できると思います。 以上、よろしくお願いします。

  • コンボボックスの値がうまく取得出来ません。

    VC++ MFCを使用しています。 コンボボックスのリストから項目が選択されるたびに その値を元にリストを更新しようとしているのですが、 コンボボックスのリストが変更されたイベント OnCbnSelchangeComboAlmselect() の中で現在の表示値を m_comBoxAlmSelect.GetWindowText(str); で取得しているのですが、 strに最新の値ではなく、選択する前の値が取得されてしまいます。 使用するイベントを間違えているのでしょうか?

  • コンボボックスの値が変更されたらそのコンボボックスに表示されたURLを開きたい

    データ型がハイパーリンクの文字列が入力されたテーブルをコンボボックスに表示させています。(添付画像参考) 希望は、 プルダウンでURLを選択したと同時にリンク先へ飛びたいです。 現在は、 プルダウンでURLを選択→コンボボックスをクリック でリンク先に飛んでいます。 多分コンボボックスのChangeイベントだと思うのですが どうすればいいのでしょうか? アドバイスよろしくお願いします。

  • コンボボックスの値リストをクエリーでも表示する方法?教えて

    フォームにコンボボックスを作ったのですが、コンボボックスの値リストを表示するフィールドをクエリのフィールドでもリストを表示選択できるようにする方法を教えていただけませんか?

  • コンボボックスのイベント

    コンボボックスで下向き三角をclick(1回目)は  [DropDown]イベントで認識でき、リストが表示されるのですが もう一度、コンボボックスで下向き三角をclick(2回目)した時  リストが元に戻るのですが、 このコンボボックスで下向き三角を2回連続でclickした場合  1回目は[DropDown]イベントが発生、2回目は・・・・   何イベントが発生するのでしょうか? 宜しくお願い申し上げます

  • Accessレポートでコンボボックスが動かない

    Access2010のレポートでコンボボックスを使いたいのですが、コンボボックスが正しく表示されず困っています。 表示されないというのは、コンボボックスのリストを選択する逆三角形が表示されず、またリストも全く表示されません。つまりテキストボックスのように空のの四角い箱が表示されてしまいます。 表示したいリストはあるテーブルから引っ張っているのですが、全く同じことをリストボックスでやろうとするとすべての項目がうまく表示できることは確認しました。 またフォームの方ではコンボボックスをから項目が選択できることも確認できています。 レポートではコンボボックスが使えないような仕様になっているのでしょうか? お分かりになる方教えていただけますでしょうか?

  • テキストボックスの値をコンボボックスの選択値によって動的に変化させたい(VB.NET)

    こんにちは。 VB.NET2003 を使用し、小さなシステムを開発中です。 例として、コンボボックスにて「社員ID」を選択すると、その隣のテキストボックスには「鈴木 一郎」というように氏名を表示させることを考えております。 そこで、一度表示された後でも、コンボボックスの値を変化させるとそれに応じてテキストボックスの値も変更させたいのですが、どのようにしたらいいのでしょうか。 コンボボックスへの値を入れ、テキストボックスへの表示させるところまではできたのですが、一度表示された後は変化しなくて・・・。 ちなみに、それらの値の取得はDataSetを使用しています。 どなたか方法をご存知の方、教えていただけませんでしょうか。

  • コンボBOXで抽出した値をテキストBOXに表示したい

    入力用フォームで注文フォームを作成しているのですが、コンボBOXで商品Noを抽出し、テキストBOXに商品名を表示したいのですが、 Private Sub コンボ1_AfterUpdate() Me!テキスト1 = Me!コンボ1.column(1) End Sub と入力したのですが、他の行にも同じ商品名が表示されます。 商品NoをコンボBOXで指定し、数量を手入力という入力フォームを作成したいのです。 作成方法を教えてください。 よろしくおねがいします

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

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