林海波's blog

VBS宏编写示例：

VBScript code复制代码

'结果必须通过Return函数返回。
'调用当前行指定一列的值：item("宝贝名称") , item("宝贝价格") ……等等。
'------------------------------
'返回值函数
Function Return()
    Dim price '定义一个变量price
    '默认进货价
    price=item("宝贝价格") '调用“宝贝价格”列的值赋给price变量
   
    '出售价设置
    price=price * 1.4 '出售价格=进货价*1.4
    Return=price '返回结果
End Function
 

下载地址：http://www.newxing.com/Code/tool/Taobao_1856.html