
コンボボックスに値リストを使って値を設定する方法です。
例
たとえば、このようなフォームにコンボボックス(comboBloodType)が貼り付けてあるとします。
このコンボボックスに値リストで値を設定するには次のように記述します。
1 2 3 4 5 6 7 8 9 | Private Sub Form_Load() '値集合タイプ Me .comboBloodType.RowSourceType = "Value List" '値集合ソース Me .comboBloodType.RowSource = "A;B;O;AB" End Sub |
実行結果

スポンサーリンク