Zitat:

ich möchte germ in Form 1 eine Combobox mit Daten our Class füllen In der Combobox soll 10kG 20kG Stehen Ich weiß ich kann es auch ohne Klasse machen mich Würde es trotzdem interoresieren ob es auch so

Public Class frmClassBinding
 
    Private Class Person
        Public Property _Name As String
        Public Property _alter As Integer
        Public Property _Vorname As String
 
        Public ReadOnly Property Fullname As String
            Get
                Return _Name & " " & _Vorname
            End Get
        End Property
 
        Public Sub New()
 
        End Sub
 
        Public Sub New(name As String, Vorname As String, Alter As Integer)
            _Name = name
            _Vorname = Vorname
            _alter = Alter
        End Sub
 
    End Class
 
 
    Dim cbo As New ComboBox With {.Parent = Me, .Width = 300}
    Dim lstPerson As New List(Of Person)
 
 
    Private Sub frmClassBinding_Load(sender As Object, e As EventArgs) Handles _
      MyBase.Load
 
        lstPerson.Add(New Person With {._alter = 75, ._Name = "Woratschek", _
          ._Vorname = "Jusssip"})
        lstPerson.Add(New Person("Kubitschek", "Maria", 68))
 
        cbo.DisplayMember = "Fullname"
        cbo.DataSource = lstPerson
 
    End Sub
End Class