Sql 使用VB.Net将excel中的特定列值导出到datagrid

如何将没有标题的特定列值导出到datagrid

dta=新的OleDbDataAdapter（“从[linexcel$]中选择*）

如何指定列（列B和D）而不是“*”。它没有常量标题

   If OpenFileDialog1.ShowDialog 
         =Windows.Forms.DialogResult.OK 
                                   Then 
        xLApp = New Excel.Application
        xLBook =   
                   xLApp.Workbooks.Open
             (OpenFileDialog1.FileName)
       xLSheet 
           =xLBook.Worksheets("Sheet1")
       For x = 1 To 
           xLSheet.UsedRange.Rows.Count 
                                   - 1
           DataGridView1.Rows.Add()
           DataGridView1.Item(0, x 
                         -1).Value = 
                    xLSheet.Cells(1 + 
                       ..  x, 1).value
          DataGridView1.Item(1, x - 
                           1).Value = 
                   xLSheet.Cells(1 + x, 

      xLSheet.UsedRange.Columns.Count)
                               .value
    Next
  End If