オブジェクト名を変数で表現するには (ID:119089)

名前

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

本文 > cmdの部分を変数にできる方法を知ってたら教えてくださいお願いします。 ありゃま。変数の使い方から始まっちゃうのですか。(^^; とりあえず、こんな感じですかね。"cmb" を 変数 S に入れています。 Dim S As String Dim I As Integer S = "cmb" For I = 1 To 9 Controls(S & CStr(I)).AddItem "OK" Next > コントロール配列を作る方法って難しいですか？ お使いの環境は何ですか? VB6等であれば、コントロール配列を作れますが、 Access VBA等だと使えません。 VB6等の場合は、複数のComboBoxに、それぞれ同じ名前をつけてみてください。(たとえば、"cmb" など) そうすると、Indexプロパティに数値が入り、「コントロール配列」に変化します。 たとえば今までは cmb1.AddItem "OK" cmb2.AddItem "OK" cmb3.AddItem "OK" のように書いていたコードが、 Dim I As Integer For I = 0 To 2 cmb(I).AddItem "OK" Next ですとか、あるいは、 Dim Combo As Combobox For Each Combo In cmb Combo.AddItem "OK" Next などのように書く事ができます。(詳細はヘルプで確認してください) なお、上記のコントロール配列と、先のControls()を使った名前指定を 組み合わせて使う事もできます。 For I = 0 To 2 Controls("Cmb")(I).AddItem "OK" Next