摘要: Private void ExportToExcel(ByVal MyTab As DataTable, ByVal strRptName As String, ByVal strReportTemplate As String, ByVal strReportHeader As String) As bool Dim XLApplication As New Excel.Application Dim XLBook As Excel.Workbook Dim XLSheet As Excel.Worksheet Dim IRow, ICol As Int32 Dim i, j As Int3 阅读全文
posted @ 2011-04-20 08:49 天水一阶 阅读(366) 评论(0) 推荐(0) 编辑
摘要: Private Function ExportToExcel(ByVal MyTab As DataTable, ByVal strRptName As String, ByVal strReportTemplate As String, ByVal strReportHeader As String) As Boolean Dim XLApplication As New Excel.Application Dim XLBook As Excel.Workbook Dim XLSheet As Excel.Worksheet Dim IRow, ICol As Int32 Dim i, j. 阅读全文
posted @ 2011-04-20 08:46 天水一阶 阅读(365) 评论(0) 推荐(0) 编辑