Hi,
ich möchte 20 ComboBox(en) mit einer Liste befüllen.
Dazu habe ich diese alle mit
Dim Controlliste() as ComboBox = {ComboBox1, Combobox2, usw.}
aufgeführt.
Wenn ich aber nun in ComboBox(0) der Liste nun was Hinzufügen möchte, bekomme ich nur ein Error:
Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.
Das ist mein momentaner Code:
Ich verstehe nicht, wieso das nicht geht oder kann man Controls einfach nicht in einer Liste zusammenführen?
mfg
gfc
ich möchte 20 ComboBox(en) mit einer Liste befüllen.
Dazu habe ich diese alle mit
Dim Controlliste() as ComboBox = {ComboBox1, Combobox2, usw.}
aufgeführt.
Wenn ich aber nun in ComboBox(0) der Liste nun was Hinzufügen möchte, bekomme ich nur ein Error:
Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.
Das ist mein momentaner Code:
VB.NET-Quellcode
- Public Class Main
- Dim NameList As New List(Of String)
- Dim Controlliste() As ComboBox = {ComboBox1, ComboBox2, ComboBox3, ComboBox4, ComboBox5, ComboBox6, ComboBox7, ComboBox8, ComboBox9, ComboBox10, ComboBox11, ComboBox12, ComboBox13, ComboBox14, ComboBox15, ComboBox16, ComboBox17, ComboBox18, ComboBox19, ComboBox20}
- Private Sub Main_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- Debug.Print(Controlliste.Length.ToString)
- Controlliste(0).Items.Add("Test")
- Using r As IO.StreamReader = New IO.StreamReader(Environment.CurrentDirectory & IO.Path.DirectorySeparatorChar & "Namensliste.txt")
- Do While r.Peek() >= 0
- Dim i As Integer = 0
- Do While Not i = Controlliste.Length
- Controlliste(i).Items.Add(r.ReadLine())
- i += 1
- Loop
- NameList.Add(r.ReadLine())
- Loop
- End Using
- End Sub
- End Class
Ich verstehe nicht, wieso das nicht geht oder kann man Controls einfach nicht in einer Liste zusammenführen?
mfg
gfc