终于用上JMP专业版了，功能就是不同

ak47ok

不按常理出牌：
JSL的代码缩进完全可以去掉多余的空格及换行。

这样就方便将常用代码制作为自己的输入法词库，
VBA的代码我早年已这样搞的了

ak47ok

可以说JMP没有将条件求和制作为函数是它的败笔：

只能通过循环来搞定了
dt=New Table("多列条件求和",AddRows(10000));
For(i=1,i<=4,i++,dt<<New Column("X",Numeric,Formula(Random Normal(0,1))));
dt<<delete column(1);
dt<<New Column("正和",Numeric,Formula(Local({i=0,n=N Col(Current Data Table())- 1},Sum(Repeat({i++ ; Column(i)[] *(Column(i)[]>0)},n)))));
dt<<New Column("负和",Numeric,Formula(Local({i=0,n=N Col(Current Data Table())- 2},Sum(Repeat({i++ ; Column(i)[] *(Column(i)[]<0)},n)))));

ak47ok

上面的代码能实现此效果