OleDbDataAdapter1.SelectCommand.CommandText = "SELECT * FROM Immo WHERE (VArt" & _
  "LIKE '" & ComboBox1.Text & "%' And Heizung Like '" & ComboBox4.Text & "%'" & _
  "And Objektart Like '" & ComboBox2.Text & "%' And Zustand Like '" & _
  ComboBox3.Text & "%' And Baujahr Like '" & TextBox1.Text & "%' And Etage Like" & _
  "'" & TextBox2.Text & "%' And Einheiten Like '" & TextBox3.Text & "%' And" & _
  "Zimmer Like '" & TextBox11.Text & "%')"
        DataSet31.Clear()
        OleDbDataAdapter1.Fill(DataSet31)

And  Lift LIKE '" & CheckBox1.checked & "%'