repl all 第四列 with max(第一列,第二列,第三列) scan do case case 第一列=第四列 repl 第四列 with "第一列" case 第二列=第四列 repl 第四列 with "第二列" case 第三列=第四列 repl 第四列 with "第三列" endcase endscan disp