Sub QueueWork()
        Dim myQueue As New Queue(Of Parameter)
 
 
        Parameter.SetZiel(Files(0), Quellpfad, Zielpfad, ZielExtension)
        Parameter.SetWindowState(ProcessWindowStyle.Normal)
        Parameter.SetSSRC()
        Parameter.SetMadplay()
        Parameter.SetLameEnc(frmWandler.combomp3Mode.Text, _
          frmWandler.combomp3Quality.Text, frmWandler.comboMP3Bitrate.Text, _
          frmWandler.comboChannel.Text)
        Parameter.SetNeroMP4Enc(frmWandler.comboneroaacMode.Text, _
        frmWandler.comboneroaacQuality.Text, frmWandler.txtneroaacBitrate.Text, _
        frmWandler.comboaacCodeMode.Text)
        Parameter.SetFlacEnc(frmWandler.comboFLACcompr.Text)
 
    End Sub
myQueue.Enqueue(?????????)