VB.NET实现EXCEL表导入DATAGRIDVIEW控件，只要第2列数据，前4行不需要，第5行作为表头保留

你可以使用以下代码实现：

'创建Excel对象
Dim excelApp As New Excel.Application()
Dim workbook As Excel.Workbook = excelApp.Workbooks.Open(filePath)

'选择工作表
Dim worksheet As Excel.Worksheet = workbook.Sheets(sheetName)
worksheet.Activate()

'获取数据
Dim range As Excel.Range = worksheet.UsedRange
Dim rowCount As Integer = range.Rows.Count
Dim colCount As Integer = range.Columns.Count

'将数据添加到DataGridView控件
For i As Integer = 5 To rowCount
    DataGridView1.Rows.Add(range.Cells(i, 2).Value)
Next

'释放Excel对象
workbook.Close(False)
excelApp.Quit()
System.Runtime.InteropServices.Marshal.ReleaseComObject(excelApp)

其中，`filePath`是Excel文件路径，`sheetName`是工作表名称。代码中使用`UsedRange`获取工作表中使用的单元格范围，然后从第5行开始遍历单元格，将第2列数据添加到DataGridView控件中。最后，释放Excel对象以释放资源。