供参考:
http://www.foxtable.com/help/index.html?n=0656.htm
Dim flg As New SaveExcelFlagsflg.CellStyle = TrueTables("成绩排名").SaveExcel( "D:\My Documents\学生成绩\" & e.Form.Controls("ComboBox2").value & "班" & e.Form.Controls("ComboBox1").value & "期" & "成绩排名.xls" ,"成绩排名",flg)