以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  导出excel报表时如何动态绑定窗口表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123540)

--  作者:蓝蚂蚁
--  发布时间:2018/8/17 10:28:00
--  导出excel报表时如何动态绑定窗口表
导出当前窗口表(即副本表)为excel文件, 这个窗口表有时候是经过筛选后的结果,   如果不同的窗口表都想用一个统一的代码,导出excel报表,如下代码只会导出当前表(非窗口副本表)
        Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
        dlg.Filter= "Excel文件|*.xls" \'设置筛选器
        If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
            CurrentTable.SaveExcel(dlg.FileName, "报表")  \'保存文件   【红色字体如何动态绑定当前副本表,即不同的窗口副本表都用同这段代码导出excel报表】
        End If

[此贴子已经被作者于2018/8/17 10:40:40编辑过]

--  作者:有点蓝
--  发布时间:2018/8/17 11:06:00
--  
e.form.controls("Table1").table.SaveExcel(dlg.FileName, "报表")  \'