返回首页
当前位置: 首页 > VB.NET教程 >

VB.net 将dataGridView中的数据导出到excel

时间:2012-04-25 09:40来源:未知 作者:admin 点击:我要投稿  高质量的ASP.NET空间,完美支持1.0/2.0/3.5/4.0/MVC等

在将dataGridView中的数据导出到excel时,到网上找了一些相关的内容,个人感觉不是太好,有的在复杂了。

下面是简单的实现dataGridView数据到excel:

当然首先要添加引用:Microsoft.Office.Interop.Excel

 

  1. Dim MyExcel As New Microsoft.Office.Interop.Excel.Application()  
  2.        MyExcel.Application.Workbooks.Add()  
  3.        MyExcel.Visible = True  
  4.   
  5.        '获取标题   
  6.        Dim Cols As Integer  
  7.        For Cols = 1 To DataGridView1.Columns.Count  
  8.            MyExcel.Cells(1, Cols) = DataGridView1.Columns(Cols - 1).HeaderText  
  9.        Next  
  10.   
  11.        '往excel表里添加数据()   
  12.        Dim i As Integer  
  13.        For i = 0 To DataGridView1.RowCount - 1  
  14.            Dim j As Integer  
  15.            For j = 0 To DataGridView1.ColumnCount - 1  
  16.                If Me.DataGridView1(j, i).Value Is System.DBNull.Value Then  
  17.   
  18.                    MyExcel.Cells(i + 2, j + 1) = ""  
  19.                Else  
  20.                    MyExcel.Cells(i + 2, j + 1) = DataGridView1(j, i).Value.ToString  
  21.   
  22.                End If  
  23.            Next j  
  24.        Next i  
本站推荐文章:
本站热点文章:
顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色 情、暴力、反动的言论。
评价:
表情:
用户名:密码: 验证码:点击我更换图片