VB.NET 代码 连接并写入ACCESS

以下是VB.NET代码连接并写入ACCESS数据库的示例：

Dim connStr As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\myFolder\myAccessFile.accdb;Persist Security Info=False;"
Dim conn As OleDbConnection = New OleDbConnection(connStr)
Try
    conn.Open()
    Dim sql As String = "INSERT INTO myTable (field1, field2, field3) VALUES (@val1, @val2, @val3)"
    Dim cmd As OleDbCommand = New OleDbCommand(sql, conn)
    cmd.Parameters.AddWithValue("@val1", "value1")
    cmd.Parameters.AddWithValue("@val2", "value2")
    cmd.Parameters.AddWithValue("@val3", 123)
    cmd.ExecuteNonQuery()
Catch ex As Exception
    '处理连接或写入数据时的异常
Finally
    conn.Close()
End Try

在这个示例中，我们首先定义一个连接字符串，其中包含我们要连接的ACCESS数据库的文件路径。然后我们创建一个OleDbConnection对象，并使用Open()方法打开连接。

接下来，我们定义一个INSERT SQL语句，用于将数据插入到数据库表中。我们使用OleDbCommand对象和AddWithValue()方法定义参数，并将其值设置为我们要写入的值。

最后，我们使用ExecuteNonQuery()方法执行SQL语句，并处理任何异常。最后，我们关闭连接。

注意，这只是一个示例，你需要根据你自己的情况进行修改。例如，你需要更改连接字符串中的文件路径，以及更改SQL语句中的表名和字段名。