1、用标记:
http://www.foxtable.com/help/topics/1396.htm
报表中插入<最大日期>,<最小日期>
Dim Book As New
XLS.Book("c:\book5.xls")
Book.Marks.Add("最大日期",Tables("表名").Compute("Max(日期)"))
Book.Marks.Add("最小日期",Tables("表名").Compute("Min(日期)"))
Book.Build()
Book.Save("c:\reports\test.xls")
Dim Proc As New
Process
Proc.File = "c:\reports\test.xls"
Proc.Start()
2、 <[原价 - [购买价]>