Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共6 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]关于tabcontrol中很多表 导出到excel的问题!

1楼
gaoyong30000 发表于:2012/1/5 16:30:00

比如page1 有表a;page2 有表b;page3 有表c

 

我用了系统的代码后 Syscmd.Project.ExportToExcel()

 

发现只导出表a 

 

我打算在每个page上 弄一个导出到excel的按钮 该怎么写相应的代码  导出相应的表!

2楼
czy 发表于:2012/1/5 16:35:00

http://www.foxtable.com/help/topics/0559.htm

 

 

3楼
IVY7323 发表于:2012/1/5 16:39:00

這個是將鼠標點到哪個表 , 就導出到哪個表

我試過沒問題的

4楼
gaoyong30000 发表于:2012/1/7 11:03:00
thank you
5楼
gaoyong30000 发表于:2012/1/7 12:39:00

SaveExcel

 

不怎么灵活哎  没法灵活指定导出位置  系统的Syscmd.Project.ExportToExcel()导出很灵活

 

该怎么弄?

[此贴子已经被作者于2012-1-7 12:39:25编辑过]
6楼
blackzhu 发表于:2012/1/7 13:55:00
Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter= "电子表格|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Tables("表A").SaveExcel(dlg.FileName,"表A")
End If
共6 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.