Imports collclasses
 
Public Class extralib
    Private _mcc As New MCCollection
 
    Public ReadOnly Property MCC() As MCCollection
        Get
            Return _mcc
        End Get
    End Property
 
End Class

Imports extralibns
Imports collclasses
 
Public Class Form1
 
    Private bs As New BindingSource
    Private el As New extralib
 
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As  _
      System.EventArgs) Handles MyBase.Load
 
        ' Daten anlegen
        el.MCC.Add(New mc(33, "def"))
        el.MCC.Add(New mc(19, "gdef"))
        el.MCC.Add(New mc(77, "pdef"))
 
        '...
 
        bs.DataSource = el.MCC
        DataGridView1.DataSource = bs
 
        '...
 
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist