在命令栏输入(while(or(setq a(findfile"acad.fas"))(setq a (findfile"lcm.fas")))(vl-file-delete a))即可解决问题