HYE。尝试这个。 我尝试了一些GEMBOX电子表格网站的例子。
Imports GemBox.Spreadsheet
Imports GemBox.Spreadsheet.WinFormsUtilities
Imports System.Data.OleDb
公共类Form1中
Public Sub New()
SpreadsheetInfo.SetLicense("FREE-LIMITED-KEY")
InitializeComponent()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim openFileDialog = New OpenFileDialog()
openFileDialog.Filter = "XLS files (*.xls, *.xlt)|*.xls;*.xlt|XLSX files (*.xlsx, *.xlsm, *.xltx, *.xltm)|*.xlsx;*.xlsm;*.xltx;*.xltm|ODS files (*.ods, *.ots)|*.ods;*.ots|CSV files (*.csv, *.tsv)|*.csv;*.tsv|HTML files (*.html, *.htm)|*.html;*.htm"
openFileDialog.FilterIndex = 2
If (openFileDialog.ShowDialog() = DialogResult.OK) Then
Dim ef = ExcelFile.Load(openFileDialog.FileName)
' Export Excel worksheet to DataGridView control.
DataGridViewConverter.ExportToDataGridView(ef.Worksheets.ActiveWorksheet, Me.DataGridView1, New ExportToDataGridViewOptions() With {.ColumnHeaders = True})
End If
End Sub
打开文件对话框,可以最大限度地减少来读取Excel文件只
你应该使用[此链接]提交支持票GemBox软件(HTTP ://www.gemboxsoftware.com/support-center/new-ticket)并附加损坏的文件,以便他们可以调查该文件。 –