Cerveza ? quien dijo cerveza !? :)
Ahora que estoy sobrio veo mas de una falla.
La primera y mas comun son las benditas comillas simples, te faltan para encerrar "empresa__MMColParam".
Luego existen 2 condiciones WHERE y el ORDER entre ambos.
Para solucionarlo tenes que modificar "Super_Search_String_1" por : "WHERE Operativo=
' " + empresa__MMColParam + "
' AND
( Titulo ...
) "
Luego empresa.Source quedaria :
empresa.Source = "SELECT * FROM Empresas WHERE " + Replace(Super_Search_String_1, "'", "''") + " ORDER BY Modalidad"
Saludos, y anda preparando el barrilito !