Pues puedes hacer un subquery:
Código:
sql2 = "Select A.*, B.*, C.* from discusion A, usuarios B, Comentarios C where A.D_autor = B.Cve_usuario And A.Cve_discusion = C.C_discusion And Cve_discusion = '"&D_id&"' WHERE a.id <> (Select TOP 1 A.*, B.*, C.* from discusion A, usuarios B, Comentarios C where A.D_autor = B.Cve_usuario And A.Cve_discusion = C.C_discusion And Cve_discusion = '"&D_id&"')"
Pero no te lo recomiendo mucho, es demasiado hacer un producto cartesiano enorme para nada, mejor controlalo directamente con tu recordset.
Saludos