マイクロソフトアクセスの記事はこちら
人気ブログランキングへ


にほんブログ村
コンボボックスでどの列を列の表示させるか
それからもう一点。
複数列のリストがあった場合、選択されたときに、
どの列を表示するのかという事です。
先ほどのコンボボックスをそのまま使用するとします。
Private Sub UserForm_Initialize()
Dim hairetu(4, 2)
ComboBox1.ColumnCount = 2
hairetu(0, 0) = "国語"
hairetu(0, 1) = 80
hairetu(1, 0) = "社会"
hairetu(1, 1) = 60
hairetu(2, 0) = "英語"
hairetu(2, 1) = 50
hairetu(3, 0) = "数学"
hairetu(3, 1) = 90
ComboBox1.List() = hairetu
ComboBox1.TextColumn=2
End Sub

上記のように「60」という表示になっていますね。
今まででしたら「社会」という表示でした。
ComboBox1.TextColumn=2
を追加することによって、2列目を表示するようになりました。
大容量256GB、メールアドレス数無制限、共有SSL対応のレンタルサーバー 『ヘテムル』