以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 导出excel代码中 怎么加入分组显示的代码呢? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=146387) |
-- 作者:李孝春 -- 发布时间:2020/2/22 17:17:00 -- 导出excel代码中 怎么加入分组显示的代码呢? 代码如下: Dim tb1 As WinForm.Table = e.Form.Controls("Table1") Dim c1 As WinForm.ComboBox = e.Form.Controls("选择表") Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog dlg.Filter= "Excel文件|*.xls" \'设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮 tb1.Table.SaveExcel(dlg.FileName, "\'" & c1.value & "\'") \'保存文件 End If 想加入按照班级 年级 姓名分组进行显示 先按年级班级分组 然后再分别显示姓名下对应的所有记录 显示完一个姓名后 再显示另外一个姓名 按年级班级显示完毕后 再显示另外一个年级班级的姓名相关记录
|
-- 作者:有点蓝 -- 发布时间:2020/2/22 17:19:00 -- 没有办法,请使用分组报表http://www.foxtable.com/webhelp/topics/1542.htm |