VB.net 使用oledb写入excel

你可以使用 VB.NET 中的 OleDb 连接来将数据写入 Excel 文件。下面是一个示例代码，演示如何使用 OleDb 连接将数据写入 Excel：

Imports System.Data.OleDb

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim excelConnectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\path\to\your\excel\file.xlsx;Extended Properties='Excel 12.0 Xml;HDR=YES;'"

        ' 创建连接对象
        Using excelConnection As New OleDbConnection(excelConnectionString)
            excelConnection.Open()

            ' 创建插入命令
            Dim insertCommand As New OleDbCommand("INSERT INTO [Sheet1$] (Column1, Column2) VALUES (?, ?)", excelConnection)

            ' 添加参数
            insertCommand.Parameters.AddWithValue("@Column1", "Value1")
            insertCommand.Parameters.AddWithValue("@Column2", "Value2")

            ' 执行插入命令
            insertCommand.ExecuteNonQuery()

            ' 关闭连接
            excelConnection.Close()
        End Using
    End Sub
End Class

请确保将 `excelConnectionString` 中的路径替换为你实际的 Excel 文件路径。上述示例假设你的 Excel 文件的第一个工作表名称为 "Sheet1"，并且有两列名为 "Column1" 和 "Column2"。

你可以根据需要修改插入命令和参数来适应你的实际情况。此外，你可能需要根据你的 Excel 文件版本修改连接字符串中的 Provider。

希望这可以帮助到你！如果你有任何其他问题，请随时问。