vb.net 在执行命令时遇到致命错误 你改变了什么？

Question

当您启动程序并单击所需的按钮时，出现以下错误“命令执行期间遇到致命错误”

你改变了什么？

Private Sub btneditar_Click(sender As Object, e As EventArgs) Handles btneditar.Click
        Try
            connection.Open()
            sqlcmd = connection.CreateCommand
            sqlcmd.CommandText = "update JOGADORES set J_NOME= @jnome, J_DATA_DE_NASC= @jdatadenasc, J_SEXO=@jsexo, J_TLF=@jtlf, J_TLM= @jtlm, J_MAIL= @jmail, J_COD_POSTAL=@jcodpostal, J_LOCALIDADE= @jlocalidade, J_NATURALIDADE= @jnaturalidade, J_NACIONALIDADE= @jnacionalidade, J_PROFISSAO= @jprofissao, J_CC=@jcc, J_NIF= @jnif, J_MODALIDADE=@jmodalidade, J_ESCALAO=@jescalao, J__POSICAO=@jposicao, J__NUMERO_CAMISOLA=@jnumero, J_FEDERADO=@jfederado, J_EE=@jee WHERE J_COD=@jcod"
            sqlcmd.Parameters.AddWithValue("@jcod", TextBox1.Text)
            sqlcmd.Parameters.AddWithValue("@jnome", TextBox2.Text)
            sqlcmd.Parameters.AddWithValue("@jdatadenasc", MaskedTextBox1.Text)
            sqlcmd.Parameters.AddWithValue("@jsexo", ComboBox1.Text)
            sqlcmd.Parameters.AddWithValue("@jtlf", MaskedTextBox3.Text)
            sqlcmd.Parameters.AddWithValue("@jtlm", MaskedTextBox2.Text)
            sqlcmd.Parameters.AddWithValue("@jmail", TextBox3.Text)
            sqlcmd.Parameters.AddWithValue("@jcodpostal", msktxtcodpostal.Text)
            sqlcmd.Parameters.AddWithValue("@jlocalidade", txtlocalidade.Text)
            sqlcmd.Parameters.AddWithValue("@jnaturalidade", ComboBox3.Text)
            sqlcmd.Parameters.AddWithValue("@jnacionalidade", ComboBox2.Text)
            sqlcmd.Parameters.AddWithValue("@jprofissao", ComboBox4.Text)
            sqlcmd.Parameters.AddWithValue("@jcc", MaskedTextBox5.Text)
            sqlcmd.Parameters.AddWithValue("@jnif", TextBox5.Text)
            sqlcmd.Parameters.AddWithValue("@jmodalidade", ComboBox5.Text)
            sqlcmd.Parameters.AddWithValue("@jescalao", ComboBox6.Text)
            sqlcmd.Parameters.AddWithValue("@jposicao", ComboBox7.Text)
            sqlcmd.Parameters.AddWithValue("@jnumero", MaskedTextBox4.Text)
            sqlcmd.Parameters.AddWithValue("@jfederado", ComboBox8.Text)
            sqlcmd.Parameters.AddWithValue("@jee", TextBox7.Text)
            sqlcmd.ExecuteNonQuery()
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Jogadores", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Finally
            listajogadores()
            limpacampos()
        End Try
    End Sub

本想更新数据库中的数据却出现“fatal error encountered during command execution”