最新下载
热门教程
- 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()
相关文章
- 高清免费观影软件下载-最新电影免费观看软件下载 02-13
- 快手网页版在线看网址-快手网页版观看入口 02-13
- 漫蛙2最新版下载安装包-漫蛙2手机版下载官网入口 02-13
- 抖音小店商家入驻入口-抖音小店商家官网登录入口 02-13
- 口袋48app下载安装2024最新版本-口袋48SNH48官方正版入口 02-13
- 126邮箱网页版直达入口-网易126邮箱官方登录 02-13