CallByName w/ComboBox

[Timberwoof]

For i = 1 To 3

CallByName(Form1.Controls("ComboBox" & i), "items.add", Type.Set, "1st item")
CallByName(Form1.Controls("ComboBox" & i), "items.add", Type.Set, "2nd item")
CallByName(Form1.Controls("ComboBox" & i), "items.add", Type.Set, "3rd item")
next

Is there a way I can populate these 3 combo boxes using the CallByName feature. My form has 3 combo boxes named ComboBox1, ComboBox2, ComboBox3.

I would really Prreeeeeeciate your help!

Timberwoof - ô¿ô
From http://www.developmentnow.com/g/38_2...nguages-vb.htm

Posted via DevelopmentNow.com Groups
http://www.developmentnow.com

[Mattias Sjögren]

>For i = 1 To 3

>
CallByName(Form1.Controls("ComboBox" & i), "items.add", Type.Set, "1st item")
CallByName(Form1.Controls("ComboBox" & i), "items.add", Type.Set, "2nd item")
CallByName(Form1.Controls("ComboBox" & i), "items.add", Type.Set, "3rd item")
next

Is there a way I can populate these 3 combo boxes using the CallByName feature. My form has 3 combo boxes named ComboBox1, ComboBox2, ComboBox3.

Any particular reason you want to use CallByName? If not, just do it
the strongly typed way

Dim combos() As ComboBox = {ComboBox1, ComboBox2, ComboBox3}
Dim items() As String = {"1st item", "2nd item", "3rd item"}
For Each c As ComboBox in combos
For Each s As String in items
c.Items.Add(s)
Next
Next
Mattias

--
Mattias Sjögren [C# MVP] mattias @ mvps.org
http://www.msjogren.net/dotnet/ | http://www.dotnetinterop.com
Please reply only to the newsgroup.