複数のコンボボックスに同じデータソースを表示させるには？

解決

---

複数のコンボボックスに同じデータソースを表示させたいのですが。

Combo1とCombo2を作成し、そこに同じデータを表示させたいのですが。
テーブル等を作成しないで表示できる
書き方はありますでしょうか。

編集 削除

---

データソースからデータを文字列で抜き出し、
Combo1 と Combo2 に同じように AddItem する。

編集 削除

---

Combo1にデータを作成できるのなら、同じ事をするだけだと思うけど・・・
VB6.0なら配列にしたらもっと楽だと思うけど

編集 削除

---

下記のような同じことを２回書きたくなく、
Combo1にもCombo2にも同様に表示させたいんです。
すいません、配列での書き方、ご教授願えませんでしょうか。
 Combo2.AddItem "1"
 Combo2.AddItem "2"
 Combo2.AddItem "3"
 Combo2.AddItem "4"
 Combo2.AddItem "5"
 Combo2.AddItem "6"
 Combo2.AddItem "7"
 Combo2.AddItem "8"
 Combo2.AddItem "9"
 Combo2.AddItem "10"
 Combo2.AddItem "11"
 Combo2.AddItem "12"

編集 削除

---

コンボボックスにアイテムを追加する処理だけを考えるなら
メソッドを作ってみては？

多分こんな感じ・・・
的を得てなかったらスルーで構いませんorz
Private Sub cboAddItem(cboObje As ComboBox)
    Dim intcnt As Integer
    For intcnt = 1 To 10 Step 1
        cboObje.AddItem CStr(intcnt)
    Next
End Sub

配列を使ってもっと丁寧に書いてみてください。

編集 削除

---

・動作が同じで代入するデータが違うのなら、それを外部データとして保持する。
・単調な操作の繰り返しはFor-Nextなどのループで代用可能。
…というまとめでおｋ？

編集 削除

---

出来ました。
combo1をフォーム上でコピペして、配列にして
for-nextで廻したら出来ました。
どうもです。。。。。

編集 削除

---

名前

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

本文

←解決時は質問者本人がここをチェックしてください。