vbnet如何将excel的数据读取出来

可以通过以下VB.NET代码来读取Excel数据：

Imports Microsoft.Office.Interop
Imports System.Runtime.InteropServices

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim excelApp As New Excel.Application
        Dim excelBook As Excel.Workbook = Nothing
        Dim excelSheet As Excel.Worksheet = Nothing

        Try
            excelBook = excelApp.Workbooks.Open("C:\test.xlsx")
            excelSheet = CType(excelBook.Worksheets(1), Excel.Worksheet)

            Dim excelRange As Excel.Range = excelSheet.UsedRange

            Dim rowCount As Integer = excelRange.Rows.Count
            Dim colCount As Integer = excelRange.Columns.Count

            For i As Integer = 1 To rowCount
                For j As Integer = 1 To colCount
                    Dim cellValue As String = excelRange.Cells(i, j).Value
                    MessageBox.Show(cellValue)
                Next
            Next

        Catch ex As Exception
            MessageBox.Show(ex.Message)
        Finally
            If excelSheet IsNot Nothing Then Marshal.ReleaseComObject(excelSheet)
            If excelBook IsNot Nothing Then excelBook.Close()
            If excelApp IsNot Nothing Then excelApp.Quit()
            Marshal.ReleaseComObject(excelApp)
        End Try
    End Sub
End Class

这段代码打开了名为`test.xlsx`的Excel文件，读取了第一个工作表的所有单元格的值，并在每个单元格的值之间弹出了一个消息框。您可以根据需要修改代码以满足您的特定要求。