主题：根据列的列表项目公式修改相邻列的刷新公式

语法
SetColFormula(Grid,Col,Formula)
Grid       指定表，可以用表名称，也可以用表位置表示。
Col        指定列，可以用列名称，也可以用列位置表示。
Formula    刷新公式。

例子
SetColFormula(GridName,"金额","[数量]*[单价]*(1-[折扣])")

提示：如果刷新公式中有引号，那么公式用两个引号表示一个，具体写法：

1、按照常规写出刷新公式：
SetColFormula(GridName,"型号",FindText("产品资料","品名","编号","=",[编号]))

2、将刷新公式中的每个双引号分别用连续的两个双引号代替：
SetColFormula(GridName,"型号",FindText(""产品资料"",""品名"",""编号"",""="",[编号]))

3、最后给刷新公式的两端加上双引号：
SetColFormula(GridName,"型号","FindText(""产品资料"",""品名"",""编号"",""="",[编号])")