根据条件,选择

dim s,expression,fieldname
 set s=activedocument.variables("varint")
 expression="sum([销售收入(万元)])"
 fieldname="工厂代码"

set f=activedocument.getfield(fieldname)
  f.topselect expression, topnum