Public Class frmErrorList Dim ErrorList As List(Of String) Public Sub New(errorlist As List(Of String)) ' Dieser Aufruf ist für den Designer erforderlich. InitializeComponent() ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. Me.ErrorList = errorlist End Sub Private Sub frmErrorList_Load(sender As Object, e As EventArgs) Handles MyBase.Load txtErrors.Text = String.Join(vbCrLf, ErrorList.ToArray) txtErrors.DeselectAll() End Sub End Class