お世話になります。VB6で開発しています。
コンボボックス(cmb_No)で▼をクリックすると、従業員No(5桁)とその横に氏名が表示されるとします。
この一覧より一つクリックして選択したときに、コンボボックスのテキストには従業員Noのみ表示させたいのですが、何か方法はありませんでしょうか?

Click時イベントでリストインデックス(idx)を取得後、

cmb_No.text = Left(cmb_No.List(idx),5)

としましたが、テキストには表示されません。
普通に何もイベントを書かずに選択すると選択したものがそのままTextに残りますよね?

A 回答 (1件)

>としましたが、テキストには表示されません。



表示されますが。。。

Private Sub Combo1_Click()
With Combo1
.Text = Left(.List(.ListIndex), 5)
End With
End Sub

この回答への補足

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

補足日時:2001/11/21 17:16
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング

おすすめ情報