Zitat:

Wäre eine Klasse zur Zusammenfassung dieser Parameter als Properties nicht zweckmäßiger.

    Private Sub GoToTest()
        Test(wert2:="hallo")
    End Sub
 
    Private Sub Test(Optional wert1 As String = "", Optional wert2 As String = _
      "", Optional wert3 As String = "")
        For Each o As ? In ?
            Dim n As String = o.name
            Dim w As String = o.value
        Next
    End Sub

Dim s As New MeinProgram.SearchTyp.Search((New MeinProgram.SearchTyp.Query With _
  {.Wert1 = "Hallo"}))

EALA FREYA FRESENA