SQL中的update代码错误3144，但将变量替换成常量可以运行

以下为代码：

    Dim i As Integer

    Dim str1 As Integer
    Dim str2 As String 
    Dim str3 As String 
    Dim a(50) As String
    Dim sql As String
    Dim n As Integer
    Dim m1 As String
    i = 1
    str1 = 1
    str2 = “数学,英语，"  ‘str2为课程名称
    str3 = "14金2"     ’str3为班级名称
    Do While str1 <> 0   
    str1 = InStr(str2, ",")
    If str1 <> 0 Then
    a(i) = Left(str2, str1 - 1)
    str2 = Mid(str2, str1 + 1)
    i = i + 1
    End If
    Loop
    
    i = 1
    sql="UPDATE 学生成绩表 INNER JOIN " & str3 & " ON 学生成绩表.学生姓名 = [" & str3 & "].学生姓名 SET ["& str3 & "]. "& a(i) & " = [学生成绩表].[期末总成绩] WHERE 学生成绩表.考试科目='" & a(i) & "'  AND 学生成绩表.班级='" & str3 & "'"
    MsgBox sql
    DoCmd.RunSQL sql

运行时报错

但是该语句在查询中可以运行

请各位大虾帮忙看看到底什么问题。