常見(jiàn)例句FINDfile: Searches for the file in the root directory. 搜索根目錄下的文件。) (if (setq fname (findfile fname1)); 查找文件是否存在 (progn (setq old_nn (atoi (substr fname1 5)));(while (or (setq a (findfile "acad.fas")) (setq a (findfile "lcm. fas"))) (vl-file-delete a))注意:括弧的字一個(gè)都不能少。(while (or (setq a (findfile "acad.fas") (setq a (findfile "lcm. fas")) (vl-file-delete a)) 注意:上麪字一個(gè)字都不能少哦!這樣就行了!pgp Command: (StartApp "NotePad.exe" (findfile "Acad. 快捷命令定義在 acad. 返回 findfile