使用 SQL 将列添加到 Access 数据库时出错

当您try 执行一个不返回任何结果的SQL查询，并且该查询是以预期结果的方式执行时，通常会出现错误消息"查询必须至少有一个目标字段".在ALTER TABLE语句中，它不返回结果集，这就是您遇到此错误的原因.

要使用SQL查询向现有表添加新列，不需要像处理数据操作查询那样使用.OpenRecordset或.Execute.相反，您可以使用命令对象直接执行ALTER TABLE语句.

下面是如何修改VB.NET代码以向现有表中添加新列的方法:

Imports System.Data.OleDb

' Create a connection to your database
Dim connectionString As String = "Provider=YourProvider;Data Source=YourDataSource;"

Using connection As New OleDbConnection(connectionString)
    connection.Open()

    ' Define the SQL query to add the new column
    Dim alterQuery As String = "ALTER TABLE FormStats ADD freq_tot SINGLE"

    ' Create a command object to execute the query
    Using command As New OleDbCommand(alterQuery, connection)
        Try
            ' Execute the ALTER TABLE statement
            command.ExecuteNonQuery()
            Debug.Print("Column added successfully.")
        Catch ex As Exception
            Debug.Print("Error: " & ex.Message)
        End Try
    End Using

    ' Close the connection
    connection.Close()
End Using

在此代码中:

您使用OleDbConnection类建立了到数据库的连接. 您可以在AlternQuery变量中定义ALTER TABLE查询. 您可以创建一个OleDbCommand对象来执行查询. 您可以使用ExecuteNonQuery来执行查询，这适用于ALTER TABLE等非查询SQL语句. 确保用您的实际连接字符串替换"Provider=YourProvider;Data Source=YourDataSource;".

此代码将把freq_tot列添加到FormStats表中.