2014-03-13 72 views
1

我在DatagridView中顯示Excel工作表數據時出現問題Excel工作表包含作爲字段的第一行,但它顯示爲我的數據datagridview控制我的應用程序。excel表格第一行字段名稱顯示爲數據而不是字段?

Public Shared Sub Excel_Connection_sheet(ByVal exlFileName As String, ByVal sheetName As String) 
     Dim strSql As String = "SELECT * FROM " & "[" & sheetName & "]" 
     Dim connString As String = String.Empty 
     If ConnectionState.Open = True Then 
       connExcel.Close() 
     End If 

     If exlFileName.EndsWith(".xlsx") Then 
       connString = String.Format("Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0};Extended Properties='Excel 8.0;HDR=No;IMEX=1;'", exlFileName) 
     ElseIf exlFileName.EndsWith(".xls") Then 
       connString = String.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0};Extended Properties='Excel 8.0;HDR=No'", exlFileName) 
     ElseIf exlFileName.EndsWith(".csv") Then 
       connString = String.Format("Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0};Extended Properties='Text 8.0;HDR=No;IMEX=1;'", exlFileName) 
     End If 
     cmdExcel.Connection = connExcel 
     oda = New System.Data.OleDb.OleDbDataAdapter(strSql, connExcel) 
     oda.Fill(myDataset) 
     Dim dt = New DataTable(sheetName) 
     frmDbconv.dgvFile.DataSource = myDataset.Tables(0).DefaultView 
     oda.Fill(myDataset.Tables(0)) 
End Sub 

回答

1

如果你想第一行中的GridView改變屬性Header這樣

connString = String.Format("Provider=Microsoft.ACE.OLEDB.12.0; 
    Data Source={0};Extended Properties='Excel 8.0;HDR=No;IMEX=1;'", exlFileName 

在此字符串更改HDR=No;HDR=YES;

+0

比你非常多,它解決了我的問題兄弟非常感謝SATSON又一次 –

相關問題