[リストへもどる]
一括表示

投稿時間:2004/08/03(Tue) 15:51
投稿者名:キューたくん
Eメール:
URL :
タイトル:
コンボボックスについて
こんにちは、キューたくんです
教えてください

VB6.0にてコンボボックスで表示を2列にできないでしょうか?

1列はこのようにしました

ComboBox.AddItem("りんご")
ComboBox.AddItem("ばなな")
ComboBox.AddItem("みかん")

2列は以下のイメージなんですが。。。

コード   名称
10000      りんご
20000   ばなな
30000   みかん
そしてコンボボックスのテキストを取得すると100000を取得したいのです
ComboBox.Text


文字列として連結することも考えましたが駄目でした

ComboBox.AddItem("10000" &b vbTab & "ばなな")
このようにするとvbTabの部分の表示が変になります

どなたかお知恵をお貸しください。お願いします。

投稿時間:2004/08/03(Tue) 17:30
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: コンボボックスについて
下記ではどうでしょうか。
同様の処理をここのリストボックスで色々しております。

Private Sub Form_Load()
    Combo1.FontName = "MS ゴシック"
    Combo1.FontSize = 12
    Combo1.AddItem (10000 & Space$(5) & "りんご")
    Combo1.AddItem (20000 & Space$(5) & "ばなな")
    Combo1.AddItem (30000 & Space$(5) & "みかん")
End Sub

Private Sub Command1_Click()
    Debug.Print Left$(Combo1.Text, 5)
End Sub

投稿時間:2004/08/03(Tue) 17:44
投稿者名:キューたくん
Eメール:
URL :
タイトル:
Re^2: コンボボックスについて
返信ありがとうございます
思い通りに動きました!