Access插入数据报错：查询值与目标字段数量不匹配，求排查

错误原因定位 #

你遇到的number or query values and destination fields are not the same错误，核心问题出在SQL语句的字段列表语法上：
原代码里把所有带空格的字段放在同一个方括号[]中，Access数据库无法识别每个独立字段，导致系统判定的字段数量和VALUES子句里的值数量不匹配，触发报错。

原错误SQL片段：

insert into vbsavedata([Student ID, First Name, Surname, Address, Postcode, Telephone, Grade, Section, Specialization])VALUES(...)

正确写法需为每个带空格的字段单独添加方括号包裹，用逗号分隔：

insert into vbsavedata([Student ID], [First Name], [Surname], [Address], [Postcode], [Telephone], [Grade], [Section], [Specialization])VALUES(...)

后续问题规避建议 #

直接拼接字符串生成SQL存在两大隐患，建议改用参数化查询：

• SQL注入风险：用户输入含单引号等特殊字符时，会直接破坏SQL语法，甚至被恶意利用。
• 数据类型不匹配：若字段为数字/日期类型，字符串拼接会导致类型转换错误。

修复后带参数化查询的代码示例：

Private Sub btnSaveData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSaveData.Click
    Try
        conn.Open()
        cmd = conn.CreateCommand
        cmd.CommandType = CommandType.Text
        cmd.CommandText = "insert into vbsavedata([Student ID], [First Name], [Surname], [Address], [Postcode], [Telephone], [Grade], [Section], [Specialization]) " & _
                          "VALUES(@StudentID, @FirstName, @Surname, @Address, @Postcode, @Telephone, @Grade, @Section, @Specialization)"
        
        ' 绑定参数值
        cmd.Parameters.AddWithValue("@StudentID", tbstudentid.Text)
        cmd.Parameters.AddWithValue("@FirstName", tbfirstname.Text)
        cmd.Parameters.AddWithValue("@Surname", tbsurname.Text)
        cmd.Parameters.AddWithValue("@Address", tbaddress.Text)
        cmd.Parameters.AddWithValue("@Postcode", tbpostcode.Text)
        cmd.Parameters.AddWithValue("@Telephone", tbtelephone.Text)
        cmd.Parameters.AddWithValue("@Grade", tbgrade.Text)
        cmd.Parameters.AddWithValue("@Section", tbsection.Text)
        cmd.Parameters.AddWithValue("@Specialization", tbspecialization.Text)
        
        cmd.ExecuteNonQuery()
        MessageBox.Show("Record Saved MS Access", "VB Save Database", MessageBoxButtons.OK, MessageBoxIcon.Information)
    Catch ex As Exception
        MessageBox.Show(ex.Message, "VB Save Database", MessageBoxButtons.OK, MessageBoxIcon.Error)
    Finally
        ' 确保连接一定会关闭，避免资源泄漏
        If conn.State = ConnectionState.Open Then
            conn.Close()
        End If
    End Try
End Sub

额外说明：如果Student ID是数字类型，需将参数值转换为对应数值类型（比如Integer.Parse(tbstudentid.Text)）。

内容的提问来源于stack exchange，提问作者Meme