Another way to do it is
strSQL = "Update tblSpullen Set SongNaam = '" & SongNaam.Value & "'"
strSQL = strSQL & ",Bank = '" & Bank.Value & "'"
etc


Regardless a Debug.Print is needed! if you cannot see the issue.