最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
在.NET环境下将报表导出EXCEL和WORD lihonggen0（原作）
时间：2022-07-02 11:30:49 编辑：袖梨 来源：一聚教程网
在.NET环境下将报表导出EXCEL和WORD lihonggen0（原作）
在VB6开发环境下，本人使用EXCEL作过报表，在.NET环境下开发，本人使用水晶报表。但VB.NET同样可以将报表导出到EXCEL和WORD进行输出，制作出专业水平的报表。
具体操作如下：(注：首先需添加引用，选择COM-->选择Microsoft 10.0 Object Library和Microsoft 10.0 Object Library组件)
1．先创建一个DataTable，作为数据来源，也可以另将其它的数据源。
Private Function CreaTable() As DataTable
Dim dt As New DataTable()
dt.Columns.Add("列1", GetType(String))
dt.Columns.Add("列2", GetType(Integer))
dt.Columns.Add("列3", GetType(String))
dt.Columns.Add("列4", GetType(String))
Dim row, row1 As DataRow
row = dt.NewRow()
row!列1 = "行1"
row!列2 = 1
row!列3 = "d"
row!列4 = "a"
dt.Rows.Add(row)
row1 = dt.NewRow()
在VB6开发环境下，本人使用EXCEL作过报表，在.NET环境下开发，本人使用水晶报表。但VB.NET同样可以将报表导出到EXCEL和WORD进行输出，制作出专业水平的报表。
具体操作如下：(注：首先需添加引用，选择COM-->选择Microsoft 10.0 Object Library和Microsoft 10.0 Object Library组件)
1．先创建一个DataTable，作为数据来源，也可以另将其它的数据源。
Private Function CreaTable() As DataTable
Dim dt As New DataTable()
dt.Columns.Add("列1", GetType(String))
dt.Columns.Add("列2", GetType(Integer))
dt.Columns.Add("列3", GetType(String))
dt.Columns.Add("列4", GetType(String))
Dim row, row1 As DataRow
row = dt.NewRow()
row!列1 = "行1"
row!列2 = 1
row!列3 = "d"
row!列4 = "a"
dt.Rows.Add(row)
row1 = dt.NewRow()
相关文章
- 小红书官网网页版入口-小红书电脑版在线登录网址 12-19
- 尾巴漫画免费浏览入口清爽纯净-尾巴漫画免费浏览沉浸无扰阅读 12-19
- duyin抖音官网首页网页版快捷入口-抖音网页版平台官方一键直达 12-19
- pixiv官网登录入口一键直达-pixiv官网快捷登录通道 12-19
- 有道翻译在线使用指南-有道翻译网页版快捷入口 12-19
- 番茄免费听小说畅听入口-番茄免费听书语音畅听入口 12-19