ComboBoxのItemDataの値の取得 (ID:110778)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 MSDNは入っていないのでしょうか？ ListIndex プロパティの例 次のプログラムは、3 人の選手の名前を一覧表示し、選択した選手に対応する給料をラベル (Label) コントロールに表示します。このプログラムを実行するには、コンボ ボックス (ComboBox) コントロールとラベル コントロールを含むフォーム モジュールのコード エディタ ウィンドウに、下のコードを貼り付けます。次に、F5 キーを押して、名前をコンボ ボックス コントロールから選択します。 Dim Player(0 To 2) ' 2 次元配列を作成します。 Dim Salary(0 To 2) Private Sub Form_Load() Dim I ' 変数を宣言します。 AutoSize = True Player(0) = "大前田" ' 配列に初期化データを設定します。 Player(1) = "下河内" Player(2) = "クレイグ" Salary(0) = "300,000,000" Salary(1) = "120,000,000" Salary(2) = "70,000,000" For I = 0 To 2 ' 一覧に名前を追加します。 Combo1.AddItem Player(I) Next I Combo1.ListIndex = 0 ' 一覧の最初の項目を表示します。 End Sub Private Sub Combo1_Click () ' 選択された名前に対応する給料を表示します。 Label1.Caption = Salary(Combo1.ListIndex) End Sub