Public Class Form1

    Public Class CarCollection
        Inherits System.Collections.ObjectModel.Collection(Of CarParameters)
    End Class

    Public Class CarParameters
        Dim _Marca As String
        Public Property Marca() As String
            Get
                Return _Marca
            End Get
            Set(ByVal value As String)
                _Marca = value
            End Set
        End Property

        Dim _Motore As String
        Public Property Motore() As String
            Get
                Return _Motore
            End Get
            Set(ByVal value As String)
                _Motore = value
            End Set
        End Property

        Public Sub New(ByVal Marca_ As String _
                        , ByVal Motore_ As String)
            _Marca = Marca_
            _Motore = Motore_
        End Sub
    End Class

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'dichiaro la nuova collezione
        Dim Collezione As New CarCollection


        'metodo per aggiungere una "Car"
        Collezione.Add(New CarParameters("MARCA", "MOTORE STRANIERO"))
        Collezione.Add(New CarParameters("MARCA 2", "MOTORE ITALIANO"))

        'per leggere tutte le proprietà di tutti le Car inserite dinamicamente bisogna sfruttare le reflection come quì sotto
        For Each Proprieta As CarParameters In Collezione
            For Each item As Reflection.PropertyInfo In Proprieta.GetType().GetProperties()
                Debug.Print(item.GetValue(Proprieta, Nothing).ToString)
            Next
        Next

    End Sub

End Class