VB.net导出花式Excel

        第一接触导出Excel表格是在第一次做机房收费系统的时候，能够顺利导出以满足：

        现在已经很简单了这个逻辑，其实就是通过代码将Excel表格画出来：

  <strong><span style="font-size:18px;"> '导出</span></strong>

<strong><span style="font-size:18px;">整段代码唯一不好理解的便是myExcel.Cell(i,j)这是从第i行第j列开始填充数据
    Private Sub btnExport_Click(sender As Object, e As EventArgs) Handles btnExport.Click
        MessageBox.Show("导出的数据如不保存将会丢失", "系统提示")
      

        Dim myExcel As New Microsoft.Office.Interop.Excel.Application()  '建立Excel连接
        myExcel.Application.Workbooks.Add(True)    '添加一个工作薄
        myExcel.Visible = True    '可见

        '将datagridview中的字段名导出   
        Dim m As Integer
        For m = 0 To dgvData.ColumnCount - 1  '获取datagridview的列的个数
            myExcel.Cells(1, m + 1) = Me.dgvData.Columns(m).HeaderText    '在Excel的第一行填写m列的datagridview的标题
        Next m

        '往excel表里添加数据   
        Dim i As Integer
        For i = 0 To dgvData.RowCount - 1      '定义datagridview里有多少行数据要往里填充
            Dim j As Integer
            For j =