Witam mam problem mam sobie formularz Main a w nim "Formant Karta" W jednej zakładce jest podformularz i chcial bym VBA zmienic zapytanie tylko tego podromularza z zupełnie innego mam taki kodzik chodzi mi o koncowke

Select Case Me.kryteria.Value
    Case "Nazwa"
        str = "[nazwa] = "" & Me.wartosc.Value & """
    Case "Właściciel"
        str = "[wlasciciel] = " & Me.wartosc.Value
    Case "Start"
        str = "[start] = " & Me.wartosc.Value
    Case "Rakieta Nośna"
        str = "[rakieta_nosna] = " & Me.wartosc.Value
    Case "Droga"
        str = "[droga] = " & Me.wartosc.Value
    Case "Wejście na Orbite"
        str = "[wejscie_orbite] = " & Me.wartosc.Value
    Case "Koniec Misji"
        str = "[koniec] = " & Me.wartosc.Value
    Case Else
        MsgBox "Wybierz jakieś kryterium"
        str = ""
    End Select
    
        If str <> "" Then
         str = str & " "
         str = "SELECT * FROM Sondy WHERE " & str
         Forms![Main].ctlSubForm.Controls![sondy].RecordSource = str // Co tu ma byc chodzi mi o to Formularz Main a w nim Podromularz Sondy i do niego dac RecordSource
        End If
Exit_Szukaj_Click:
    Exit Sub