vb.net 怎么将execl读取到数值中

你可以使用 .NET Framework 提供的 Excel 库，比如 Office Interop Excel 库，来读取 Excel 文件中的数据。以下是一个简单的示例，演示如何读取 Excel 文件中的第一个工作表的数据并将其存储到一个数组中：

Imports Microsoft.Office.Interop.Excel

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim excelApp As New Application()
        Dim excelWorkbook As Workbook = excelApp.Workbooks.Open("C:\path\to\your\excel\file.xlsx")
        Dim excelWorksheet As Worksheet = excelWorkbook.Worksheets(1)
        Dim range As Range = excelWorksheet.UsedRange
        Dim numRows As Integer = range.Rows.Count
        Dim numCols As Integer = range.Columns.Count
        Dim data(numRows - 1, numCols - 1) As Object

        For i As Integer = 1 To numRows
            For j As Integer = 1 To numCols
                data(i - 1, j - 1) = range.Cells(i, j).Value
            Next
        Next

        excelWorkbook.Close()
        excelApp.Quit()
    End Sub
End Class

在这个示例中，我们使用 `Application` 类来启动 Excel 进程，打开 Excel 文件并获取第一个工作表。然后，我们使用 `UsedRange` 属性获取工作表中使用的单元格范围，并将其存储在 `range` 变量中。接下来，我们可以使用 `Rows.Count` 和 `Columns.Count` 属性来获取单元格范围的行数和列数。我们创建一个与单元格范围相同大小的数组 `data`，并使用两个循环遍历单元格范围，将单元格中的值存储到 `data` 数组中。最后，我们关闭 Excel 文件和 Excel 进程。

请注意，使用 Office Interop Excel 库需要在计算机上安装 Microsoft Excel 软件，并且这种方法可能会比较慢和不稳定。如果你只是想读取 Excel 文件中的数据，还可以考虑使用第三方库，比如 `NPOI` 或 `EPPlus`。这些库不需要安装 Microsoft Excel 软件，并且可以提供更好的性能和稳定性。